Desculpem-me voltar ao assunto, mas ainda não consegui resolver esta parada.
A propriedade KeyPreview do form está = True.
No evento KeyPress do form, tem o seguinte código.
If Keyascii = vbKeyReturn then
SendKeys ("{TAB}")
Keyascii = 0
End IF
Bem, no form, há combobox intercaladas com caixas de texto. No evento Got_Focus das combos, há uma rotina <Sendkeys {"F4"}> que faz com que, ao receber o foco, as combos exibam a lista de opções. Até aí, tudo bem. A tabulação entre os campos é feita pela tecla Enter, e as combos exibem as listas normalmente.
Contudo, diversos campos são numéricos, onde deve haver a ação do usuário. Ocorre que, sistematicamente, a tecla NumLock fica desativada, não permitindo a utilização do teclado numérico...
Se eu tiro a função <Sendkeys {"F4"} dos eventos Got_Focus das combos, então as listas não são exibidas. Contudo, a tecla NumLock fica ativada, permitindo a utilização do teclado numérico.
Como é que eu posso compatibilizar a abertura das combos toda vez que tabulo entre os campos, sem desativar a tecla Number Lock? Alguém sabe?
Donald again.
">