Date Function

Returns the current system date as a string, or date variant.

Date[$][()]

Sub ExampleDate
    MsgBox "日期为 " & Date
End Sub