Public Function FixUpVariantToStringFn( _
ByRef rArgument As Variant _
) As Boolean FixUpVariantToStringSub Subroutine
FixUpVariantToStringFnRecursive FunctionSummary: Convert numeric and date arguments to their default string representation. Return False if the argument cannot be converted to a string. Example:
Function Soundex(ByVal vValue As Variant) As Variant
' Return Null if argument vValue is Null or cannot
' be converted to a string.
If Not FixUpVariantToStringFn(vValue) Then
Soundex = Null
Exit Function
End If
' Other code here.Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.