mostrar numeros del textbox en moneda en tiempo de ejecucion

[ernestoelunico]

Estoy usando vb6 sp6 y access 2003

como dice mi titulo yo quiero que en tiempo de ejecucion es decir mientras estoy trabajando en mi formulario de vb6 al incertar datos numericos en mi textbox aparesca por defecto el signo de modena en el.


y que cuando cargue el formulario tambien en mis text aparesca por defecto $0.00
y de ahi que al meter datos se mantenda este formato es decir que si yo digito 100
me aparesca en tiempo de ejecucion $100.00.

tambien quiero saber si esto no afectaria que estos datos los estoy guardando en una base de datos de access 2003 cuya propiedad de los campos es moneda no se si abri algun tipo de problema al tratar de hacer esto 

[vlad]

Lo que necesitas es usar el Masked Edit Box.

[ernestoelunico]

  Ilustrame con tu sabiduria............
porque no se como

[ernestoelunico]

este es el codigo que tengo lo primero me sirve para bloquear que el usuario ingrese otra cosa que no sea numeros y lo ultimo se supone que es para hacer lo que yoq quiero pero no me funciona

Private Sub text1_KeyPress(KeyAscii As Integer)
     If InStr("0123456789.", Chr(KeyAscii)) = 0 Then
        If KeyAscii <> 8 Then KeyAscii = 0
     End If
     If KeyAscii = 13 Then
KeyAscii = 0 ' Para que no "pite"
SendKeys "{tab}"
StrDeFormato = Format(Text1, "$#,##0.00")
Text1.text = StrDeFormato
End If
End Sub

[Juancho]

Es cierto unicamente con el MaskedEditBox, solo le pones la mascara con el signo de moneda x ejemplo la Mask: "$#####.00" y listo te deberia d aparecer en moneda, o bueno noc si ya habra algun formato preestablecido alli de moneda! No recuerdo bn!

[ernestoelunico]

gracias por la ayuda pero me ubieran espcificado que rayos era esto si una propiedad un component eun alinea de codigo.........

pero despues de pensarlo lo busque en componentes y lo haye  gracias lo provare a ver si no me distorsiona lo que estoy haciendo

[vlad]

Lo siento, creo que ambos (Juancho y yo) supusimos que se entendía que era un control

En todo caso, no creo que el Masked Edit Box afecte mucho tu proyecto, aunque es un poco molesto el hecho de que vas a tener que borrar y reemplazar (donde corresponda) los Text Box que ya tenias por este control.

[ernestoelunico]

al final  si funciono pero no me gusta como se ve asi que no lo usare da mucho problema
pero gracias a todos  tratare de pagarles aportando mas y preguntando menos