Visual Basic - TEXTBOX

yo me prfegunto si en el txtbox.text no se puede negar el acceso a algonos caracteres o
ej:

que solo me acepte "A,B,C,E,F"

Y SI YO ESCRIBO DENTRO DE EL UNA "G" O "Z" U OTRA LETRA QUE NO MENSIONE EN LA LISTA QUE DE MUN MSGBOX "CARACTER NO ACEPTADO'"

que dentro de su contenido solo me acepte esos caracteres.

espero que me entiendan

Claro pues hombre, tienes q ir al evento keypress pones esto.

if keyascii<>"el valor en codascii de A" then
keyascii= 0
elseif keyascii<>"el valor en codascii de B" then
keyascii=0
:
:
asi sucesivamente

Hola!!!!

He investigado el codigo que te han dejado, he echo unos cambios para mejorarlo y me ha quedado este codigo, aqui te lo dejo.

-------------------------------------------------------------------------------------
Private Sub Text1_KeyPress(KeyAscii As Integer)

If KeyAscii = 65 Then 'A y a=97
Exit Sub
ElseIf KeyAscii = 66 Then 'B y b=98
Exit Sub
ElseIf KeyAscii = 67 Then 'C y c=99
Exit Sub
ElseIf KeyAscii = 69 Then 'E y e=101
Exit Sub
ElseIf KeyAscii = 70 Then 'F y f=102
Exit Sub
Else
KeyAscii = 0
MsgBox ("CARACTER NO ACEPTADO"), vbOKOnly
Text1.SetFocus
End If

End Sub
-------------------------------------------------------------------------------------

Espero que te sirva
Besos!!!

Goyi

Prueba esto: es muy similar a los anteriores, pero esta optimizado

Private Sub Text1_KeyPress(KeyAscii As Integer)
If InStr("ABCEF" & Chr(8), UCase(Chr(KeyAscii))) = 0 Then
KeyAscii = 0
MsgBox "CARACTER NO ACEPTADO'"
End If
End Sub