Validaciones Básicas en VB

[juan007]

Bueno haber haber validaciones basicas creooo compañero que deberia buscar en internet hay muchas y hay de diferentes formas segun el desarrollador.

Para validar si es numerico el numero ingresado

If isnumeric(text1) then
msgbox "Es numero"
end if

pero esto tien una falencia que si digitas 1234hola la funcion isnumeric asume que es numerico pero realmente no lo es.

para el caso de validar letras con la misma funcion tan solo debes por un NOT adelante del la funcion isNumeric

Para pasar de una caja de texto a otra tan solo hacer clic en el eventro KeyPress de la caja de texto y digitar esto:

mejor el ejemplo completo

Private Sub Text6_KeyPress(KeyAscii As Integer)
SendKeys "{tab}"
KeyAscii = 0
End Sub

ojo pero tienes que preocuparte de poner los tabIndex de la propiedades de las caja de texto en el orden en que tu estimes conveniente Por ejemplo:

Si tu quieres que de la caja de texto1(text1) salte a la caja de texto5(text5) lo primero es poner el tabIndex 0 el del text1 y luego 1 en el tabindex de la caja5(text5)

Si aun asi es algo complicado en el mismo evento Keypress pones:
if keyascii=13 then
text5.setfocus
end if

bueno espero haberte ayudado

Suerte

Saludos desde Viña del Mar CHILE