Description

Number representing the type of a Single variant.

Comments

This constant is equal to 4.

Example

This example defines a function that returns True if the passed variant is a Real number.

Function IsReal(v As Variant) As Boolean
  If VarType(v) = ebSingle Or VarType(v) = ebDouble Then
    IsReal = True
  Else
    IsReal = False
  End If
End Function

Sub Main()
  Dim i as Integer
  i = 123
  If IsReal(i) then
    Msgbox "i is Real."
  End If
End Sub

See Also

VarType (function); Variant (data type).

E