KEYASCII
é o seguinte quando eu estou em um campo e quero que quando eu apertar a tecla ENTER ele pule para o outro campo, eu coloco a seguinte rotina
Private Sub txtcod_KeyPress(KeyAscii As Integer)
If KeyAscii = vbkeyreturn Then
txtcampo2.setfocus
KeyAscii = 0
End If
End sub
Se eu substituir vbkeyreturn por vbkeyf6 , seria para o sistema executar a mesma operação quando a telca f6 fosse pressionada. Porém isso não acontece.
Ele da certo com qualquer tecla menos com as teclas do f (f1, f2, f3 e etc) !!!
Como resolver este problema?
Obs: Ja tentei colocar o valor numérico ao invés de escrever vbkeyf6 e mesmo assim não funcionou ...
Private Sub txtcod_KeyPress(KeyAscii As Integer)
If KeyAscii = vbkeyreturn Then
txtcampo2.setfocus
KeyAscii = 0
End If
End sub
Se eu substituir vbkeyreturn por vbkeyf6 , seria para o sistema executar a mesma operação quando a telca f6 fosse pressionada. Porém isso não acontece.
Ele da certo com qualquer tecla menos com as teclas do f (f1, f2, f3 e etc) !!!
Como resolver este problema?
Obs: Ja tentei colocar o valor numérico ao invés de escrever vbkeyf6 e mesmo assim não funcionou ...
Para usar as teclas Fx, se não estou enganado, só nos eventos KeyUp e KeyDown.
Experimenta e me avisa.
Abraços,
Experimenta e me avisa.
Abraços,
Tópico encerrado , respostas não são mais permitidas