<-- Previous || Up || Next -->

Fix Up Variant To String Fn Function
Fix Ups Class

Public Function FixUpVariantToStringFn( _
    ByRef rArgument As Variant _
    ) As Boolean

"Fix Up Variant To String Function"
Leave string values as-is, and convert numeric or date arguments into string values.
Return True if the argument is already a string or if it was successfully converted to one.
Return False otherwise.

See also:
    FixUpVariantToStringSub Subroutine
    FixUpVariantToStringFnRecursive Function
Summary: Convert numeric and date arguments to their default string representation. Return False if the argument cannot be converted to a string.
rArgument: The argument which is converted into a string value, if possible. Function returns True if the rArgument is a string or if it can be converted to one. Function returns False if conversion was not possible, such as when the argument is missing, Null, an array, an error, or an object.
Note: rArgument is a passed by reference, so the variable passed from the calling function may be modified.


    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.