ebCurrency (constant)

Description Number representing the type of a Currency variant.
Comments This constant is equal to 6.
Example This example checks to see whether a variant is of type Currency. 
Sub Main()
  Dim MyVariant
  If VarType(MyVariant) = ebCurrency Then
    MsgBox "Variant is Currency."
  End If
End Sub
See Also VarType (function); Variant (data type).