Visual Basic - Ayuda/reglas de validacion

Estoy utilizando el visdata y quiero validar un campo de texto para que solo se pueda escribir texto en el.

Me imagino que quieres que el textbox solamente se capturen letras, espero y sea lo que ocupes...saludos!!!
Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 65 To 90 'a-z
KeyAscii = KeyAscii
Case 97 To 122 'A-Z
KeyAscii = KeyAscii
Case 8, 32 '<-- y barra espaciadora
KeyAscii = KeyAscii
Case Else
KeyAscii = 0
End Select
End Sub