Foros Ingeniería Civil

HOLA. Soy nuevo en la programacion de VB. Tengo un problema q puede ser minimo de resolver.
Tengo un TextBox donde se debe escribir un valor numerico..pero antes de aceptar ese valor..necesito que envie un mensaje MsgBox alertando en caso de que se escriba letras en vez de numeros..tonces no se como escribir esa condicion...Agredecere cualqueir tipo de ayuda..gracias.

Puedes usar el siguiente codigo:

Private Sub text1_KeyPress(KeyAscii As Integer)
If KeyAscii < Asc("0") Or KeyAscii > Asc("9") Then
KeyAscii = 0 ' Cancela el carácter.
Beep ' Sonido de aviso de error.
MsgBox "debes teclear un numero"
End If
End Sub

Hola,

Lo que te han puesto antes esta bien, pero hay una funcion de VB precisamente para eso ISNUMERIC, para saber si algo es un numero. busca en la ayuda utilizala es muy util, y te ahorras lineas de codigo.

saludos.

gracias por su respuestas ..ha sido de gran ayuda..