keypress....urgente
Publicado por Rafael (18 intervenciones) el 25/09/2009 19:54:14
Hola lo que quiero hacer es muy fácil
por ejemplo: pulsando alt+f8+k y que me arranque cualquier cosa determinada...un form, un commad oculto.....
yo se este código manteniendo pulsado la X
Private Sub Command1_KeyUp(KeyCode As Integer, Shift As Integer)
If KeyCode = 88 Then
Command1.Visible = False
End If
End Sub
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 88 Then
Command1.Visible = True
End If
End Sub
--------------
me arranca un command pero este codigo no me sirve quiero que me digan el anterior
porfavor es urgente.....
por ejemplo: pulsando alt+f8+k y que me arranque cualquier cosa determinada...un form, un commad oculto.....
yo se este código manteniendo pulsado la X
Private Sub Command1_KeyUp(KeyCode As Integer, Shift As Integer)
If KeyCode = 88 Then
Command1.Visible = False
End If
End Sub
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 88 Then
Command1.Visible = True
End If
End Sub
--------------
me arranca un command pero este codigo no me sirve quiero que me digan el anterior
porfavor es urgente.....
Valora esta pregunta


0