Instrução Date
Retorna a data do sistema como string ou reinicializa a data. O formato da data depende da configuração local do seu sistema.
Sintaxe:
Date ; Date = Text As String
Parâmetros:
Text: necessário apenas para redefinir a data do sistema. Nesse caso, a expressão de cadeia de caracteres deve corresponder ao formato de data definido nas configurações locais.
Exemplo:
Sub ExampleDate
MsgBox "A data é " & Date
End Sub