Vb6 如何从日期获取月份和年份

如何从日期获取月份和年份

Date = 01/02/2012 (dd/mm/yyyy)

从上述日期开始，我想获得

2012年2月（mm/yyyy）

如何在vb6中编写代码

---

需要vb6代码帮助

您可以使用带有日期参数的

Month（）

和

Year（）

函数

例如，

Month（Now）

将返回月份，

Year（Now）

将返回年份

Dim yourDate As Date
yourDate = #01/02/2012#

Dim yourMonth As Integer
Dim yourYear As Integer
yourMonth = Month(yourDate)
yourYear = Year(yourDate)

---

您可以使用

格式$

：

Dim formattedDate as String
Dim myDate as Date

myDate = #1/2/2012#
formattedDate = Format$(myDate, "mm/yyyy")

---

文字日期值应以磅符号括起，即

Dim yourDate As date=#01/02/2012#

。否则，请将日期声明为

String

，并使用

CDate

将字符串值更改为日期。谢谢@Deanna。我被日期类型格式弄得心烦意乱，忘记了在VB6中不能同时声明变量并为同一行上的变量提供初始值。我们在Gopal之前不是已经讨论过这些了吗？