PEGAR PRESSIONAMENTO DE TECLA DE QUALQUER OBJETO

WEBIER 02/09/2010 12:51:31
#352021
tem 1 button no meu form com varios objetos que ganha focu (textbox, maskedbox, combobox, etc)

gostaria que quando eu tivesse em qualquer um objeto e pressionasse a tecla F2 ele fizesse tal comando

ai fiz:

If KeyCode = vbKeyF2 Then
    PDV_Consulta.Show 1
End If


mas eu tenho q colocar isso dai em cada objeto para ser acionado quando pressionar a bendita tecla....

não existe uma forma de unificar isso, ou seja, de qualquer objeto se eu pressionar ele funciona ?
MOREIRA 02/09/2010 13:00:55
#352023
veja se te ajuda aí......

Private Sub TxtCodigo_KeyDown(KeyCode As Integer, Shift As Integer)

Select Case KeyCode
Case vbKeyF1
frm_qualquer01.shou

Case vbKeyF2
frm_qualquer02.shou

Case vbKeyF3
frm_qualquer03.shou

End Select
End Sub

é colocado em um unico campo txtcodigobarra no evento keydown
WEBIER 02/09/2010 14:57:29
#352032
tipo assim.

imagina que eu tenha 10 textbox

text1, text2, text3..........text10

o que eu quero é quando pressionar o F2 em qualquer um dos 10 textboxes ele vai funcionar.... sem ter q colocar o mesmo codigo no keydown dos 10 textboxes

como eu faço?
MARCELO.TREZE 02/09/2010 15:08:58
#352033 Resposta escolhida
coloque o no keydown do form e vai funcionar em qualquer objeto
WEBIER 02/09/2010 15:42:57
#352037
coloquei e nao funciona:

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF2 Then
    PDV_Consulta.Show 1
End If
End Sub
MARCELO.TREZE 02/09/2010 15:46:45
#352039
MUDE A PROPRIEDADE KEYPREVIEW DO FORM PARA TRUE E TENTE NOVAMENTE
Tópico encerrado , respostas não são mais permitidas
Voltar