Date Statement
Returns the current system date as a string, or resets the date. The date format depends on your local system settings.
Синтакса
Date ; Date = Text As String
Параметри:
Text: Only required in order to reset the system date. In this case, the string expression must correspond to the date format defined in your local settings.
Пример
Sub ExampleDate
msgbox "The date is " & Date
End Sub