Validar TextBox

[netSlayer]

Private Sub txtNumeros_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtNumeros.KeyPress
If Asc(e.KeyChar) <> 8 Then
If Asc(e.KeyChar) < 48 Or Asc(e.KeyChar) > 57 Then
e.Handled = True
msgbox("Ingrese solo numeros")
End If
End If
End Sub

El codigo es en un evento como podras darte cuenta, es el keypress del textbox txtNumeros, simplemente selecciona el textbox que quieras y dale el evento keypress y copias el codigo q te acabo de poner. Lo que hace es verificar si el codigo ascii de la tecla esta entre los valores de los numeros, si no, consume el evento.