Visual Basic - URGENTE...

Life is soft - evento anual de software empresarial
 
Vista:

URGENTE...

Publicado por Norma Perez (52 intervenciones) el 23/08/2004 23:07:29
Hola!!!
Podria alguien decirme por favor como hacerle para que en un cuadro de texto cuando yo capture una cantidad, la vaya formateando conforme la voy tecleando en el text ??? es decir que si escribo 1000, en cuanto yo teclee me ponga 1,000.

Mil gracias ;)
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

RE:URGENTE...

Publicado por Semper (74 intervenciones) el 23/08/2004 23:39:30
Haz el formateo en los eventos GotFocus y LostFocus

No puedes hacerlo "asi nada mas" durante la edicion del textbox (en el evento Change por ejemplo), pues se pierde la posicion del cursor donde debe entrar el digito tecleado cuando la posicion cambia de cientos a miles, de miles a millones, etc...

Si no quieres que se autoseleccione el contenido completo del textbox comenta las lineas de .SelStart y .SelLength ...

Private Sub Text1_GotFocus()
If Not IsNumeric(Me.Text1) Then
Me.Text1 = "0"
End If
Me.Text1 = Format(Me.Text1, "############0.00")
Me.Text1.SelStart = 0
Me.Text1.SelLength = Len(Me.Text1)
End Sub

Private Sub Text1_LostFocus()
If Not IsNumeric(Me.Text1) Then
Me.Text1 = "0"
End If
Me.Text1 = Format(Me.Text1, "###,###,###,##0.00")
End Sub
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