Visual Basic - Me está volviendo loco

A ver si alguien me puede ayudar...

Es una operación de redondeo simple.
Ejecutando la aplicación con F5 en desarrollo, me dá un resultado, el correcto.
Compilo y ejecuto el ejecutable en el mismo pc, y me da otro resultado, el incorrecto.

Alguien sabe a que puede ser debido?

Gracias de Antemano.

Me a sucedido un par de veces, ese tipo de errores, adjunta el codigo asi lo miro i lo intento depurar. Saludos

El resultado de la operación es 0.965 al redondear a dos decimales me deja 0.96 en lugar de 0.97

Me he dado cuenta, que si el resultado fuera 0.9651, el redondeo le haría correcto, pero no puedo sumarle al resultado 0.0001 por que si el resultado de la operación fuera 0.9644 me subiría a 0.97 sin tener que hacerlo.

Por cierto, no uso la fórmula round, ya que siempre falla en casos como este.

¿y qué fórmula usas, entonces?

Esta, y ya digo en dasarrollo funciona ferpectamente

Public Function NE_REDONDEAR(NUMERO As Double, Optional DECIMALES As Integer) As Double

Dim dblPot As Double
Dim dblF As Double

If NUMERO < 0 Then dblF = -0.5 Else: dblF = 0.5
dblPot = 10 ^ DECIMALES
NE_REDONDEAR = Fix(NUMERO * dblPot * (1 + 1E-16) + dblF) / dblPot
' DBLNTOR = NUMERO A REDONDEAR
' intcntdec= numero de decimales

End Function

te complicas demasiado la vida:

numero = Format(numero, "#,##0.00")

sin funciones añadidas y va a funcionar siempre el redondeo

Eso te devuelve un texto, no?

El tipo que devuelve es el mismo que le hayas puesto en la declaración de la variable, si numero lo has declarado como Double, devolverá un double, si lo has declarado como String devolverá una cadena.
.