Foros del web, para los que viven de bits

zaida · 25-abr-2008, 02:22

Hola a todos, tengo el siguiente problema.

Estoy utilizando Gambas (Linux) y necesito que un textbox sólo me permita introducir números y comas y otro TexBox sólo me permita intruducir letras. He estado buscando información y he probado varios códigos, pero ninguno me funciona:

Código:

PUBLIC SUB TexBox1_KeyPress(KeyAscii AS Integer)
IF KeyAscii <> 8 THEN
   IF (KeyAscii < 48) OR (KeyAscii > 57) THEN
   KeyAscii = 0
   ENDIF
ENDIF
END

Código:

PUBLIC SUB TexBox1_KeyPress()
IF Key.Code <> 8 THEN
   IF (Key.Code < 48) OR (Key.Code > 57) THEN
   Key.Code = 0
   ENDIF
ENDIF
END

Código:

PUBLIC SUB TexBox1_KeyPress()
IF NOT IsNumber(TextBox1.Text) THEN
message.Info("Ingrese solo numeros")
ENDIF
END

¿Podeis ayudarme?
Saludos y gracias

Avellaneda · 25-abr-2008, 03:25

Hola,

El segundo código es el correcto pero sustituye Key.Code = 0 por STOP EVENT

Un saludo

zaida · 25-abr-2008, 03:43

Muchas gracias!!!!

Saludos

25-abr-2008, 02:22	#1 (permalink)
zaida Fecha de Ingreso: noviembre-2006 Ubicación: Madrid (España) Mensajes: 259	problema TextBox (solo numeros, solo letras) Hola a todos, tengo el siguiente problema. Estoy utilizando Gambas (Linux) y necesito que un textbox sólo me permita introducir números y comas y otro TexBox sólo me permita intruducir letras. He estado buscando información y he probado varios códigos, pero ninguno me funciona: Código: PUBLIC SUB TexBox1_KeyPress(KeyAscii AS Integer) IF KeyAscii <> 8 THEN IF (KeyAscii < 48) OR (KeyAscii > 57) THEN KeyAscii = 0 ENDIF ENDIF END Código: PUBLIC SUB TexBox1_KeyPress() IF Key.Code <> 8 THEN IF (Key.Code < 48) OR (Key.Code > 57) THEN Key.Code = 0 ENDIF ENDIF END Código: PUBLIC SUB TexBox1_KeyPress() IF NOT IsNumber(TextBox1.Text) THEN message.Info("Ingrese solo numeros") ENDIF END ¿Podeis ayudarme? Saludos y gracias __________________ *-- Cuando sientas miedo y no tengas un hombro dónde apoyarte, no te hundas en la soledad, pues si lo haces fracasarás --*

25-abr-2008, 03:25	#2 (permalink)
Avellaneda Fecha de Ingreso: enero-2008 Ubicación: Madrid Mensajes: 813	Re: problema TextBox (solo numeros, solo letras) Hola, El segundo código es el correcto pero sustituye Key.Code = 0 por STOP EVENT Un saludo

25-abr-2008, 03:43	#3 (permalink)
zaida Fecha de Ingreso: noviembre-2006 Ubicación: Madrid (España) Mensajes: 259	Re: problema TextBox (solo numeros, solo letras) Muchas gracias!!!! Saludos __________________ *-- Cuando sientas miedo y no tengas un hombro dónde apoyarte, no te hundas en la soledad, pues si lo haces fracasarás --*

Herramientas
Mostrar Versión Imprimible Enviar por Correo
Desplegado
Mode Lineal Cambiar a Modo Hibrido Cambiar a Modo Hilado