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

Fix Up Variant To Decimal Maybe Sub Sub
Fix Ups Class

Public Sub FixUpVariantToDecimalMaybeSub( _
      ByRef rArgument As Variant _
    , ByVal vDefault As Variant _
    )

"Fix Up Variant To Decimal Maybe Subroutine"
Assign the value vDefault to rArgument if rArgument cannot be converted to a Decimal value.
Numeric strings are converted into Decimal values,
date/time strings are converted into Date values,
and other numeric values are left as-is.

See also: 
    FixUpVariantToDecimalMandSub Subroutine
    FixUpVariantToDecimalMaybeFn Function
rArgument: Argument that is checked for compatibility with the Decimal data type. Argument will actually be converted to a Decimal value if it is a numeric string or date/time string. Subroutine assigns the default value vDefault to rArgument if conversion is not possible, such as when the rArgument is out-of-range, missing, Null, an error, a pointer, or a non-numeric string.
Note: rArgument is a passed by reference, so the variable passed from the calling function may be modified.
vDefault: The default value which is assigned to rArgument when conversion is not possible.
Note: The default value can be a data type other than Decimal as long as it is compatible with the variable passed via rArgument.
v1.5 Addition: This function is new to version 1.5 of Entisoft Tools.

Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.