以字符串形式返回当前的系统日期,或者复位日期。日期的格式取决于本地系统的设置。
Date ; Date = Text As String
Text:仅在复位系统日期时需要。在这种情况下,字符串表达式必须符合本地设置中定义的日期格式。
Sub ExampleDate
msgbox "The date is " & Date
end sub