Date Function

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

Date[$][()]

Sub ExampleDate
    MsgBox "The date is " & Date
End Sub