Sobre codigos ASCII

[~~]

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 [Seleccionar] Expandir

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

[CeLaYa]

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

[~~]

Hola:

Gracias ya me funciona, pero cuando intento sumarlos:

Código [Seleccionar] Expandir

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

[Chief]

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

[~~]

Hola:

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