1. WIKI教程
2. 学习VBA
3. Date

Date

函数返回当前系统日期。

语法 (Syntax)

date()

例子 (Example)

添加按钮并添加以下功能。

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