Date Functions VisualBasic Script

Sub formatDemo11()
    Debug.Print Format(#4/1/2006 12:36:54 PM#, "aaaa")
End Sub