Date Functions VisualBasic Script

Sub dateDemo15()
   Debug.Print timeValue(Now)
End Sub