Foros Club Delphi - duda con function DoNumber

Hola a todos.

Tengo una pequeña duda con la función DoNumber. Este es el código:

Código:

 

function DoNumber(str, nDigitsAfterDecimal, nLeadingDigit, nUseParensForNeg, nGroupDigits)

DoNumber = FormatNumber(str, nDigitsAfterDecimal, nLeadingDigit, nUseParensForNeg, nGroupDigits) 

End Function 

 

response.Write(saldo + " antes<br>");

saldo = "" + String(cambiar(saldo));

saldo = DoNumber(saldo, 2, 0, 0, 0);

response.Write(saldo + " luego(funcion DoNumber)<br><br>");

Los resultados que arroja:

1.000,00 antes
100000,00 luego(funcion DoNumber), no entiendo por qué tiene dos ceros de más.

Alguien me podría decir que puede estar mal en el código?