Visual Basic - Formato de TextBox

Life is soft - evento anual de software empresarial
 
Vista:

Formato de TextBox

Publicado por Marcelo (20 intervenciones) el 26/03/2004 18:18:10
Hola.
cómo puedo ponerle formato numérico a un text box?
explico, tengo una caja de texto en donde el usuario va a ingresar una cantidad de dinero en ella

y por ejemplo, aparece así: 100000

Eso mismo quiero que aparezca de este modo:
100.000,00

sin que el usuario tenga que digitar ni puntos ni comas.

En propiedades del textbox probé poniéndole "Number" al Dataformat pero no cambió nada.

Saludos.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

usa format,hi va ejm....

Publicado por polx - peru (14 intervenciones) el 26/03/2004 18:41:14
En el evento LOSTFOCUS pon este codigo (ejm para texbox "txtImporte")

Private Sub txtImporte_LostFocus()
txtImporte = Format$(txtImporte, "###,###,###.##")
End Sub

talque cuando el usuario digite y se ubique en la ste. casilla, recien saldra con el formato que pides..

saludos
pol

Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Formato de TextBox

Publicado por ppmoncayo (7 intervenciones) el 26/03/2004 18:52:29
aqui te v un jemplo que a la vez te permite digitar solo numeros
bye...

Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim CAR As Integer
CAR = Val(KeyAscii)
If CAR <= 57 And CAR >= 48 Then
KeyAscii = CAR
ElseIf KeyAscii = 13 Then
Text1.Text = Format(Text1.Text, "###,##0.00")
'*****' SOLO A MANERA DE EJEMPLO
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
'*** para que se vuelva a digiatar en el control
Else
KeyAscii = 0
End If
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Formato de TextBox

Publicado por Unomásnomás (77 intervenciones) el 26/03/2004 19:36:31
Asi es.. asi de facil...o en lostfocus o en keypress = 13
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Formato de TextBox

Publicado por damian (1 intervención) el 26/03/2004 23:55:05
Tengo casi el mismo problemita, ya solucione el despliegue, pero cuando mando a grabar a la base de datos, la coma de separacion me interpreta como separador de campo, y consigo un error. si uso val(text1) el numero que regresa es de los digitos anteriores a la coma
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

usa REPLACE

Publicado por polx - peru (14 intervenciones) el 27/03/2004 17:40:19
para el ultimo mensaje: inmediatamente antes de grabar, debes reemplazar esas comas por vacios con la funcion REPLACE, asi:
REPLACE(valor,",","").. que significa=en la cadena valor que esta el nro,reemplazas las comas por vacios, talque el nro(por ejm):12,800.25 sera 12800.25 y si grabara correctamente
suerte
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Formato de TextBox

Publicado por Marcelo (20 intervenciones) el 29/03/2004 19:02:33
Gracias a todos por la ayuda.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar