VBA - Date 函数

该函数返回当前系统日期。

语法

date()

示例

添加一个按钮并添加以下函数。

Private Sub Constant_demo_Click()
   Dim a as Variant
   a = date()
   msgbox "The Value of a : " & a
End Sub

执行该函数时，会生成以下输出。

The Value of a : 19/07/2014