MoneyFormat()
Posted: Thu Jun 09, 2016 1:45 pm
I prefer this over FormatNumber(), as it uses local PC settings for the currency symbol, decimal separator, and thousands separator:
This is how FormatNumber() should work, IMO. 
Code: Select all
Procedure.s MoneyFormat(amount.d)
m$=Space(999)
GetCurrencyFormat_(0,0,StrD(amount,2),0,@m$,990)
ProcedureReturn m$
EndProcedure
Debug MoneyFormat(91397.45000) ; $91,397.45
