Year 函数可返回表示年份的一个数字。
Year
Year(date)
Module Module1 Sub Main() Dim D = #2007/10/1# Console.WriteLine(Year(D)) End SubEnd Module
Module Module1
Sub Main()
Dim D = #2007/10/1#
Console.WriteLine(Year(D))
End Sub
End Module
输出:
2007