ebDate (constant)

Description Number representing the type of a Date variant.
Comments This constant is equal to 7.
Example 
Sub Main()
  Dim MyVariant as Variant
  If VarType(MyVariant) = ebDate Then
    MsgBox "This variable is a Date type!"
  Else
    MsgBox "This variable is not a Date type!"
  End If
End Sub
See Also VarType (function); Variant (data type).