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

Now

Function Now返回当前系统日期和时间。

语法 (Syntax)

Now()

例子 (Example)

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

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

执行上述功能时，会产生以下输出。

The Value of a : 19/07/2013 3:04:09 PM