Quisiera saber como hacer mi codigo para q cuando pulse cierta combinacion de teclas ejecute un comando.
Por ejemplo q cuando aprima Ctrl + Alt + E se muestre un mensaje de que he pulsado las teclas
Nose si me explico bien.
Lo puedes hacer de varias formas.
La mejor seria la funcion GetAsyncKeyState.
Declaras la funcion:
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Declaras las Constantes, en tu caso el Ctrl + Alt + E
Public Const VK_CTRL = &H11
Public Const VK_ALT = &H12
Public Const VK_E = &H45
Y en el codigo:
Private Sub Timer1_Timer() 'En el timer pone 1 intervalo de 1 ms
If GetAsyncKeyState(VK_E) Then
If GetAsyncKeyState(VK_CTRL) < 0 Then
If GetAsyncKeyState(VK_ALT) < 0 Then
'Aki va la accion
End If
End If
End If
End Sub
Espero k te sirva.
Salu2
Autor