TECLA DE ATALHO PARA BUTTONMENU DE TOOLBAR
Pessoal,
existe tecla de atalho
Ex:: "Alt+Algumacoisa" para menu de toolbar no caso de Dropdown
Obs: a toolbar esta em um MDI.
Obrigado
Nilson[S39]
existe tecla de atalho
Ex:: "Alt+Algumacoisa" para menu de toolbar no caso de Dropdown
Obs: a toolbar esta em um MDI.
Obrigado
Nilson[S39]
vc terá que fazer isto no form_keydown
Private sub Form_Keydown()
if keycode = "Alt+Algumacoisa" then
' execute o comando
end if
end sub
Private sub Form_Keydown()
if keycode = "Alt+Algumacoisa" then
' execute o comando
end if
end sub
Não entendi a dúvida, mas no caso de Form_Keydown, seu exemplo se faz estar errado Cleverton !
Primeiramente, habilite a propriedade KeyPreview do formulário em questão. Agora, um exemplo :
No caso de Shift=2, não lembro-me se é CTRL, ALT ou SHIFT..mas o utilizei como exemplo, somente !
Ok ?
Primeiramente, habilite a propriedade KeyPreview do formulário em questão. Agora, um exemplo :
Private Sub Form1_KeyDown(KeyCode as Integer,Shift as Integer)
If(Keycode=vbKeyQ and(Shift=2))Then
MsgBox "William"
End If
End Sub
No caso de Shift=2, não lembro-me se é CTRL, ALT ou SHIFT..mas o utilizei como exemplo, somente !
Ok ?
Acontece que a tool esta em um MDI e MDI não possui
o evento KeyDown.
Obrigado pela atenção[S39]
o evento KeyDown.
Obrigado pela atenção[S39]
Tópico encerrado , respostas não são mais permitidas