Visual Basic - Controlar en un txtbox que solo admita integer?

Life is soft - evento anual de software empresarial
 
Vista:

Controlar en un txtbox que solo admita integer?

Publicado por ProLiC (12 intervenciones) el 10/11/2006 15:39:47
Hola!!! Quiero preguntaros si sabeis alguna forma de que en un text box solo se pueda introducir numeros enteros o decimales y lo mismo para strings, es decir que en un txtbox solo se pueda meter letras pero no numeros. 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:Controlar en un txtbox que solo admita integer?

Publicado por [email protected] (140 intervenciones) el 10/11/2006 16:13:01
no se si exista algo mejor peor yo lo hago algo así

if val(text1)=int(val(text1)) then

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:Controlar en un txtbox que solo admita integer?

Publicado por ProLiC (12 intervenciones) el 10/11/2006 17:28:59
Haciendo eso te funciona? Porque si metes caracteres y haces un val, no te los convierte a su codigo ASCII? entonces la condicion se cumpliria aunque metieses letras. He puesto el codigo ese y la condicion siempre es verdaderas. Gracias por tu respuesta :)
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:Controlar en un txtbox que solo admita integer?

Publicado por JuanC (68 intervenciones) el 11/11/2006 00:55:20
Muchachos, no es tan complicado ver si un String contiene
sólo los dígitos del 0 al 9 y el signo - (en caso de admitirse los enteros negativos)
en el primer lugar...

Saludos desde Baires, JuanC
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:Controlar en un txtbox que solo admita integer?

Publicado por ProLiC (12 intervenciones) el 11/11/2006 09:12:53
Entonces segun tu como seria?
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:Controlar en un txtbox que solo admita integer?

Publicado por JuanC (68 intervenciones) el 11/11/2006 14:29:19
Pues tan sencillo como comparar cada caracter del String con los
caracteres permitidos (-0123456789)
Si alguno de ellos no es, entonces no es un número entero (si se permiten los
negativos entonces el signo - debe estar sólo una vez y en la primer posición)

Una idea...

n = "0123456789"
s = Trim(Text1.Text)
l = Len(s)

For i = 1 To l
If Not InStr(1, n, Mid(s, i, 1)) > 0 Then
MsgBox "no es entero"
Exit Sub
End If
Next

Tan difícil es? me parece que no lo intentaron...

Saludos desde Baires, JuanC
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