Desearía controlar que los datos introducidos en un textbox determinado sean numéricos (rango de 0 al 9) a través del evento keypress....

¿alguien me podria decir cómo hacerlo?

se que tengo una variable keyascii, pero no consigo que me lo reconozca como un número, y no como una constante acumulada en la variable ...

¿Cómo lo hago?

GRACIAS

hola,lo podes hacer asi de facil:

Código:

Private Sub Text1_KeyPress(KeyAscii As Integer)
       
If InStr(1, "0123456789," & Chr(8), Chr(KeyAscii)) = 0 Then
       
KeyAscii = 0
       
End If
       
End Sub

ahi le pones los caracteres que queres que te acepte en este caso del 0 al 9 ,podes combinar letras y numeros o podes hacerlo para que agarre letras solamente.

otra posibilidad es con la funcion IsNumeric de visual basic,algo asi:

if not isnumeric(text1) then
.....
end if

saludos.

GRACIAS

seria

if not isnumeric(chr(keyascii)) then keyascii = 0