Public Function MakeSingleFast( _ ByVal vValue As Single _ ) As String
MakeSingleFast(0) = Chr$(0) + Chr$(0) + Chr$(0) + Chr$(0) MakeSingleFast(1) = Chr$(0) + Chr$(0) + Chr$(128) + Chr$(63) MakeSingleFast(2) = Chr$(0) + Chr$(0) + Chr$(0) + Chr$(64) MakeSingleFast(2.5) = Chr$(0) + Chr$(0) + Chr$(32) + Chr$(64)See also:
MakeSingle Function CoerceToSingleFast Function MakeVarType FunctionvValue: The Single (precision floating-point numeric) 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.