SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: erick185 en Miércoles 20 de Septiembre de 2006, 05:07

Título: Text Que Tenga El Simbolo De La Moneda
Publicado por: erick185 en Miércoles 20 de Septiembre de 2006, 05:07

Hola

Tengo una duda, se puede hacer que cuando uno ingrese una cantidad el simbolo de la moneda aparesca automaticamente, ejemplo:

Si yo coloco 100 dentro del text, que automicamente aparesca asi  $ 100.00 es posible hacer esto.

Espero que me hayan explicado, cualquier opinion sera bienvenida.

De antemano gracias

Salu2

Título: Re: Text Que Tenga El Simbolo De La Moneda
Publicado por: cpmario en Miércoles 20 de Septiembre de 2006, 05:13

Revisa la función Format

Código: Text

1.     Dim lngNum As Long
2.     lngNum = 100
3.     Text1.Text = Format(lngNum, "$###,###.00")
4.  
5.  

:comp:

Título: Re: Text Que Tenga El Simbolo De La Moneda
Publicado por: cpmario en Miércoles 20 de Septiembre de 2006, 05:16

Para que aparezca en forma automática coloca el código em el evento LosFocus

Código: Text

1. Private Sub Text1_LostFocus()
2.     Dim lngNum As Long
3.     Text1.Text = Format(lngNum, "$###,###.00")
4. End Sub
5.  

 :comp: