Month 函数可返回表示年的月份的数字,介于 1 到 12。
Month
Month(date)
Module Module1 Sub Main() Dim D = CDate(#1/15/2002#) Console.WriteLine(Month(D)) End SubEnd Module
Module Module1
Sub Main()
Dim D = CDate(#1/15/2002#)
Console.WriteLine(Month(D))
End Sub
End Module
输出:
1