Data Type VisualBasic Script

Sub dateDemo12()
   Debug.Print time
End Sub