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