Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

Numeros con TextBox

Estas en el tema de Numeros con TextBox en el foro de Visual Basic clásico en Foros del Web. Soy un novato en vb6 y a lo mejor la pregunta es un poco inocente, pero.. Estoy haciendo un programa para meter datos(números con decimales), ...
  #1 (permalink)  
Antiguo 21/09/2006, 03:50
 
Fecha de Ingreso: septiembre-2006
Mensajes: 15
Antigüedad: 17 años, 8 meses
Puntos: 0
Numeros con TextBox

Soy un novato en vb6 y a lo mejor la pregunta es un poco inocente, pero..

Estoy haciendo un programa para meter datos(números con decimales), los cuales introduzco a través de cajas textbox.
¿Hay alguna propiedad o manera de establecer la entrada númerica en el textbox que sea con coma para los decimales y punto para los miles?.
  #2 (permalink)  
Antiguo 21/09/2006, 14:04
Avatar de kortiz  
Fecha de Ingreso: septiembre-2006
Mensajes: 16
Antigüedad: 17 años, 8 meses
Puntos: 0
en el Evento KeyPress del Cuadro de texto ingresas los siguiente:

Select case Keyascii
Case 8, 13, 27 'Permite el borrar, enter y escape
Keyascii=Keyascii
Case 44 'Permite la coma para separacion decimal
Keyascii=Keayscii
Case 48 to 57 'Permite entrada de numeros
keyascii=keyascii
Case else 'Bloquea cualquier otro caracter
Keyascii=o
End select

En el Evento LostFocus
if Texto.Text="" then Texto.Text="0"
Texto.Text=FormatNumber(Texto.Text,2) 'Formatea el valor con dos decimales, y separador de millares
  #3 (permalink)  
Antiguo 25/09/2006, 11:49
 
Fecha de Ingreso: septiembre-2006
Mensajes: 15
Antigüedad: 17 años, 8 meses
Puntos: 0
Gracias por tu respuesta kortiz.
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 00:54.