Visual Basic - correccion del Anterior

Disculpen todos el codigo que me envio The_ma3x es el siguiente

Dim strValor As String
strValor = Format(Val(Text1.Text), "0,##.00")
Text1.Text = strValor


Gracias

prueba reemplazando el val por cdbl con esto de transformara el texto a un valor double eso deberia tomarte la parte decimal

Cierto kinoscar, pero no te respetaria el formato de las comas en los miles. Por eso lo puse en String. Aunque pensandolo bien... lo ideal seria usar el Microsoft Masked Edit Control 6.0 en Componentes. Y se soluciona el problema sin nada de código.

Saludos
Pd. No se por que no lo pense en un principio.