Date Functions VisualBasic Script

Sub dateFunctions()
    Debug.Print "Hh:Nn:Ss AM/PM: " & Format(Now, "Hh:Nn:Ss AM/PM")
End Sub