Data Type Functions VisualBasic Script

Sub FormatData()
   Debug.Print Format$(Now, "DDDD")
End Sub