Punto Y Coma

[jorevale]

Hola amigos

Verán. Este es un problema que parece simple, pero que ya me tiene de los nervios.

Tengo un textbox donde voy a introducir un importe. En la propiedad DataFormat del textbox intento definirlo a currency, pero SIN el símbolo del euro. Al quitarle el símbolo del euro y aplicar, en las propiedades del textbox no me sale el DataFormat como currency, sino como número.

Vale.

El problema es que me interesa que si el usuario escribe un punto "." se interprete como coma "," y he escrito en el código lo siguiente, que es ampliamente conocido y está en las FAQs

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = Asc(".") Then KeyAscii = Asc(",")
End Sub

El asunto es que si pongo, por ejemplo, 25.84, no me lo convierte a 25,84 sino a 2.584,00 y, si pongo, 25,84, lo deja así.

Alguna idea... porfa?

Gracias