Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: ~~ en 31 Agosto 2006, 01:03 am

Título: Sobre codigos ASCII
Publicado por: ~~ en 31 Agosto 2006, 01:03 am

Hola:

Vereis e consultado varias tablas de codigos ascii en google pero no encuentro el de la tecla "Alt", acso es q no tiene???

Lo q quiero hacer es q por ejemplo al pulsar las teclas "Alt" + "Tabulacion" salte un MsgBox. Kedaria asi:

Código:

Private Sub Text1_KeyPress(KeyAscii As Integer)
if (keyascii = 9 & ?? )then
    MsgBox "no lo intentes"
End If
End Sub

Alguien sabe cual es el numero q va en ??

1S4ludo

Título: Re: Sobre codigos ASCII
Publicado por: CeLaYa en 31 Agosto 2006, 01:11 am

debes utilizar esto el evento KeyDown y el código del Alt es el 18
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
end sub

Título: Re: Sobre codigos ASCII
Publicado por: ~~ en 31 Agosto 2006, 01:51 am

Hola:

Gracias ya me funciona, pero cuando intento sumarlos:

Código:

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If (KeyCode = 18 & 9) Then
MsgBox "No =("
End If
End Sub

No me funciona, sale el menu ese, alguna idea

Gracias y 1S4ludo

Título: Re: Sobre codigos ASCII
Publicado por: Chief en 31 Agosto 2006, 15:21 pm

Pone una variable booleana, que verifique que antes se preciono tal tecla, que se yo, pensa :P.

Título: Re: Sobre codigos ASCII
Publicado por: ~~ en 31 Agosto 2006, 16:39 pm

Hola:

Citar

Pone una variable booleana, que verifique que antes se preciono tal tecla, que se yo, pensa .

A ver ya se pensar yo solo sin q me tengas q animar tu xDDD. Si pregunto es por q ya llevo algun tiempo pensando y no se me ocurre nada, si no no preguntaria.

1S4ludo