IsDate

IsDate(variant )

Returns a value that indicates if a variant parameter can be converted to a date.

Related Topics: IsEmpty, IsNumeric, VarType

Example:

Sub Main

Dim x As String

   Dim MArray As Integer, MCheck

   MArray = 345

   x = "January 1, 1987"

   MCheck = IsDate(MArray)

   MChekk = IsDate(x)

   MArray1 = CStr(MArray)

   MCheck1 = CStr(MCheck)

   Print MArray1 & " is a date " & Chr(10) & MCheck

   Print x & " is a date" & Chr(10) & MChekk

End Sub