Public Function CompareExactDataType( _ ByVal vOne As Variant _ , ByVal vTwo As Variant _ , Optional ByVal vCompare As Variant _ ) As Integer
CompareExactDataType("ALL", "all", vbBinaryCompare) = -1 CompareExactDataType("all", "ALL", vbBinaryCompare) = 1 CompareExactDataType("ALL", "all", vbTextCompare) = 0 CompareExactDataType("3", 3) = 1 CompareExactDataType(Null, 3) = -1See also:
CompareCoerceDataType Function CompareLikeDataType Function EqualExactDataType Function StrComp Function (Visual Basic)If the arguments vOne and vTwo have the same data type, then compare the values.
-1 if vOne < vTwo 0 if vOne = vTwo 1 if vOne > vTwoSummary: Use String comparisons on strings. Use Numeric comparison on numbers and/or dates. The data type of both arguments must be the same for comparison to take place.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.