[Resolvido]Teclas auxiliares

Pessoal, boa tarde!!


Estou com uma dificuldade,

Estou utilizando as teclas F2, F3,F4,...

Só que não consigo usar em qualquer parte do formulário e sim, somente dentro de um textbox.

A dúvida é como utilizo as teclas auxiliares em qualquer parte do form?

ou seja em qual procedimento posso teclar por exemplo a tecla F2 e a mesma responder de acordo com o código utilizado?


pois fiz alguns testes no próprio form e não funcionou.


Grato,

Campos.

mude essa propriedade do formulário "Visualizar teclas = Sim", com isso os eventos de teclas serão pegos primeiro pelo formulário para depois ir para os controles...

acho que e isso!!

Como vai TorresForte,

Seja bem vindo ao forum,

esse detalhe mencionado por você é muito importante em relação as teclas.

Mas o que preciso é:

Exemplo:

Estou no formulário principal;

Teclo F3:
abre um form1

ao fechar este form1 e voltar para o form principal o foco é perdido,
e se apertar novamente a tecla F3 já não funcionará.

Onde acabo deicando uma textbox realçada de uma cor diferente para a pessoa clicar ali dentro e teclar a tecla de acordo com a função.

Mas tem que clicar dentro da textbox.

Ou se for no form o problema é a mesma coisa.

Tenho que clicar dentro do form para as teclas auxiliares funcionarem.

ou seja preciso de um código que ao fechar o form1 automaticamente o form principal esteja pronto para que quando teclar as auxiliares possa responder.

Ou mesmo já contenha um código dentro do principal para ativar sempre quando apertar as teclas.

Exemplificação simples:

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyF3
DoCmd.OpenForm "form1"
Case vbKeyF8
DoCmd.OpenForm "form2"
End Select
End Sub

grato

Campos.

E o que você acha de adicionar um código no evento ao sair dos formulários para que eles devolvam o foco para o formulário principal.

Algo como:

form1 ao fechar
formularioPrincipal.setFocus

é só uma ideia...

Ok!

Testei assim, mas nas teclas auxiliares não funcionou.

Grato,

Campos.

se puder anexar o BD !!

aqui fiz uns testes e funcionou!! rsrs

abraços..

Boa tarde, veja um exemplo simples.

https://www.dropbox.com/s/ophnyluha3psglq/Exemplo%20Campos.accdb?dl=0

Coloque visualizar teclas - Sim

No evento Ao Apertar Tecla

Código:

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
On Error GoTo Err_Form_Keydown
Select Case KeyCode
Case vbKeyF1
KeyCode = 0
DoCmd.OpenForm "frm1"
Case vbKeyF2
KeyCode = 0
DoCmd.OpenForm "frm2"
Case vbKeyF3
KeyCode = 0
DoCmd.OpenForm "frm3"
Case vbKeyF4
KeyCode = 0
DoCmd.OpenForm "frm4"
Case vbKeyF5
KeyCode = 0
Case vbKeyF6
KeyCode = 0
Case vbKeyF7
KeyCode = 0
Case vbKeyF8
KeyCode = 0
Case vbKeyF9
KeyCode = 0
Case vbKeyF10
KeyCode = 0
Case vbKeyF11
KeyCode = 0
Case vbKeyF12
KeyCode = 0
Case Else
End Select
Exit_Form_Keydown:
Exit Sub
Err_Form_Keydown:
KeyCode = 0
Resume Exit_Form_Keydown
End Sub

Acabei de testar seu anexo!! e funcionou!!

Abri o arquivo frm_exemplo aberto

1 - Pressionei F1 do teclado abriu o frm1
2 - Fechei o frm1 clicando o x
3 - Pressionei F1 do teclado abriu novamente frm1
4 - Fechei o frm1 novamente clicando no x

....

fiz teste com as outras teclas!! e esta tudo funcionando direitinho!!!

Sim, dessa forma funciona certinho..

Vamos aguardar os testes do amigo criador do tópico para podermos finalizar.

Olá Pessoal,

Bom dia,

primeiramente, obrigado pela força de vcs.

Então, amigos,

realizando os teste da forma que estou usando não funcionou,

vejam só.

percebi que quando o recurso pop-up está sim, as teclas auxiliares não funcionam corretamente, e sim somente quando abre o form, mas se precisar apertar em sequências não funcionam e como preciso utilizar as teclas auxiliares com o formulário pop-up ativado, resulta o problema.

E para melhor análise, volta o arquivo com o formulário principal com pop-up = sim


grato, campos

Inclui código nos formulários frm1, frm2, frm3 e frm4 no evento ao Fechar

Código:


Private Sub Form_Close()
    Form_frm_exemplo.SetFocus
End Sub


Assim quanto os formulários são fechados eles devolvem o foco para o formulário principal aqui frm_exemplo

Ok! pessoal,

conduzindo ao fechar o foco deu tudo certo,

agora fechou!

Fico muito grato pela força,

Um abraço forte,

Ao Fernando Bueno e ao TorresForte.

Muito grato,


Campos.

O forum agradece o retorno!