Visual Basic - validar un TextBox para q no ingresen numeros

hola, necesito saber como validar un textbox , para q no entren numero ni simbolos como ?'¿Ç o cualquiera de ellos , solo letras, ya q el
If IsNumeric(Chr(KeyAscii)) Then


no me sirve pq solo impide q se digiten letras

gracias , espero su pronta ayuda

Utiliza éste codigo hasta que encuentres otro mas corto. En realidad así fue que puede hacer lo que pides, si alguien tiene otro metodo mas corto pues que proceda a enviartelo.

Como bien sabemos en el evento Keypress colocamos el siguiente codigo.

-------------------------------------------------------------------------------------------------------
If KeyAscii <> 8 Then
If KeyAscii < 97 Or KeyAscii > 122 Then
If KeyAscii <> 241 Then
If KeyAscii < 65 Or KeyAscii > 90 Then
If KeyAscii <> 209 Then
KeyAscii = False
End If
End If
End If
End If
End If
----------------------------------------------------------------------------------------------------------

Referencia sobre los codigos Ascii

8 = BackSpace
de 97 a 122 son las letras de a hasta la z en minusculas sin incluir la ñ
241 = eñe minuscula (ñ)
de 65 hasta 90 son las letras MAYUSCULAS sin incluir la Ñ
209 = eñe mayuscula (Ñ)

Suerte.!!!

hola, gracias por la pronta respuesta
lo que pasa es que el profe es pone simbolos del teclado como ¿ ª ¨¨ que no estan en el codigo ascii y es asi como me bota los programas y no me pone buena nota

gracias

No se porque el codigo no sale organizado. organizalo en tu programa porque yo tranto de enviartelo organizado y cuando le doy a enviar datos y se desorganiza.

aqui lo tienes otra ves a ver si te apacere organizado ahora.

If KeyAscii <> 8 Then
If KeyAscii < 97 Or KeyAscii > 122 Then
If KeyAscii <> 241 Then
If KeyAscii < 65 Or KeyAscii > 90 Then
If KeyAscii <> 209 Then
KeyAscii = False
End If
End If
End If
End If
End If

Es normal que ese codigo no funcione bien, prueba este:

Private Sub Text1_KeyPress(KeyAscii As Integer)

Select Case KeyAscii
Case 8 'Deja el borrar
Case 13 'Intro toma el valor de vbtab "tabulación" por si hay mas campos que recorrer
SendKeys (vbTab)
Case 65 To 90 'Mayusculas
Case 97 To 122 'Minusculas
Case 209 'Ñ
Case 241 'ñ
Case Else
KeyAscii = 0 'El resto de teclas valen 0
End Select

End Sub

No hay ninguna diferencia, los dos funcionan igual solo que se utilizan sintaxis diferentes.

ahhh!! y ambos estan correctos, lo probe los dos.