Public Function FixUpVariantToBooleanMandFn( _ ByRef rArgument As Variant _ ) As Boolean
FixUpVariantToBooleanMaybeFn Function FixUpVariantToBooleanMandSub SubroutinerArgument: The argument which is changed to a Boolean value, if possible. Function returns False if conversion was not possible, such as when the argument is out-of-range, missing, Null, an error, a pointer, or a non-numeric string.
Example #1:
Assuming Dim varFlag As Variant varFlag = "0" for example FixUpVariantToBooleanMandFn(varFlag) = True leaves varFlag = False VarType(varFlag) = vbBooleanExample #2:
Assuming Dim varFlag2 As Variant varFlag2 = "Word" for example FixUpVariantToBooleanMandFn(varFlag2) = False leaves varFlag2 = "Word"
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.