Public Function EqualLikeDataTypeFast( _
ByRef vOne As Variant _
, ByRef vTwo As Variant _
, ByRef vCompare As VbCompareMethod _
) As Boolean EqualLikeDataTypeFast("ALL", "all", vbBinaryCompare) = False
EqualLikeDataTypeFast("all", "ALL", vbBinaryCompare) = False
EqualLikeDataTypeFast("ALL", "all", vbTextCompare) = True
EqualLikeDataTypeFast("3", 3, vbTextCompare) = FalseSee also: EqualLikeDataType Function
CompareLikeDataTypeFast Function
StrComp Function (Visual Basic)Function returns: True if vOne = vTwo
False if vOne <> vTwoSee the following table which describes how comparisons are made depending upon data type of arguments. vTwo
D S
vOne D n F
S F sVarType Codes: D = Date/Numeric
S = StringAction Codes: F = Return False
s = Do String comparison with StrComp
n = Do numeric/Date comparisonCopyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.