Date Functions VisualBasic Script

Sub dateDemo1()
    Debug.Print Date
End Sub