Solo numero o solo letra

Doggie
15 de Junio del 2004
me pueden decir como ago patra que en un text solo se escriba solo Numero o solo letra

sdemingo
15 de Junio del 2004
Hola,

Private Sub Text1_KeyPress(keyascii As Integer)

'Este codigo sólo deja meter números
If InStr("0123456789", Chr(keyascii)) = 0 Then keyascii = 0

End Sub

Eso es para escribir solo números, hazlo al revés y lo tendrás para las letras

salu2
sdemingo