Now

返回一个 Variant (Date)，根据系统日期和时间指定当前日期和时间。

语法：Now [ () ]

示例

此示例使用 Now 函数返回当前系统日期和时间。

Dim Today
Today = Now           ' Assign current system date and time.
Debug.Print Today     ' Prints e.g. 5/7/2026 2:30:15 PM
Debug.Print Year(Today)    ' e.g. 2026
Debug.Print Month(Today)   ' e.g. 5
Debug.Print Hour(Today)    ' e.g. 14

另请参阅

• Date、Time 属性