Public Function MakeCurrencyFast( _
ByVal vcurValue As Currency _
) As String MakeCurrencyFast(0) = String$(8, 0)
MakeCurrencyFast(1) = Chr$(16) + Chr$(39) + String$(6, 0)
MakeCurrencyFast(2) = Chr$(32) + Chr$(78) + String$(6, 0)
MakeCurrencyFast(2.5) = Chr$(168) + Chr$(97) + String$(6, 0)See also: MakeCurrency Function
CoerceToCurrencyFast Function
MakeVarType FunctionvcurValue: The Currency value whose bytes are to be interpreted as a string. Note: This function converts the string representation of the value to Unicode using the default code page of the system.
v1.3 Change: Removed 16-bit support from this function.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.