IsDate Function

Syntax              IsDate(expr)

Group                Variable Info

Description       Return the True if expr is a valid date.

Parameter         Description

expr                    A variant expression to test for a valid date.

See Also            TypeName, VarType.

Example            '#Language "WWB-COM"
Sub Main
    Dim X As Variant
    X = 1
    Debug.Print IsDate(X) 'False
    X = Now
    Debug.Print IsDate(X) 'True
End Sub