Public Function MakeDateFast( _ ByVal vValue As Date _ ) As String
MakeDateFast(#4/6/96#) = String$(4, 0) + Chr$(32) + Chr$(43) + Chr$(225) + Chr$(64) MakeDateFast(0) = String$(8, 0) MakeDateFast(1) = String$(6, 0) + Chr$(240) + Chr$(63) MakeDateFast(2.5) = String$(6, 0) + Chr$(4) + Chr$(64)See also:
MakeDate Function CoerceToDateFast Function MakeDoubleFast Function MakeVarType FunctionvValue: The Date 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.