Date Functions VisualBasic Script

Sub dateFunctions6()
    Debug.Print "ddd: " & format(Now, "ddd")
End Sub