I think I have to skip the built in format function and use MBS instead:
http://www.monkeybreadsoftware.net/class-numberformatmbs.shtml
To work around the automatic conversion to scientific notation I use this hack (called from GotFocus handler)
[code]Function imGetNumberString(Number As String) As String
'*********************************************
’ Clean a formatted number string from apostrophes
’ and return it with 2 digits after decimal point
'*********************************************
Dim n As NumberFormatMBS
n=New NumberFormatMBS
Dim exp As Int64 = Number.CDbl * 100
Dim cExp As String = Str(exp)
Dim Eur As String = Left(cExp,Len(cExp)-2)
Dim Cts As String = Right(cExp,2)
Return Eur+n.DecimalPoint+Cts
End Function
[/code]