第07章 VBA工具类

VBA Date 当前日期

返回系统当前日期。

语法

Property Date As Variant

示例

Sub sub2()
  Dim d1 As Date

  '返回系统当前日期
  d1 = Date
  Debug.Print d1

  Debug.Print "年:" & Year(d1) & ",月:" & Month(d1)

End Sub

运行结果：

2023/6/15 
年:2023,月:6