Date Functions VisualBasic Script

Sub dateFormat2()
    Dim datDateTime As Date
    datDateTime = #11/30/1998 10:54:17 AM#
    Debug.Print datDateTime
    Debug.Print format(datDateTime, "dd mmm yy")
End Sub