Data Type VisualBasic Script

Sub dateSub()
    Dim thisDate As Date
    thisDate = #10/8/2003#
    Debug.Print thisDate
End Sub