INICIANDO ROTINA

USUARIO.EXCLUIDOS 03/08/2007 12:06:52
#229335
COMO FAÇO PARA INICIAR UMA ROTINA QUANDO UMA TECLA DO TECLADO FOR PRESSIONADA?
OBRIGADO
THIAGO.CC 03/08/2007 12:14:55
#229337
Renato,

Tenta fazer isso.

Private Sub text1_KeyPress(Index As Integer, KeyAscii As Integer)

    'techa enter foi digitado
    If KeyAscii = 13 then
       rotina()
    End If

end Sub


So um detalhe dependendo da tecla que vc quer fazer a rotina, não funciona na opção Keypress, ai vc tem que usar a opção text1_KeyDown.

Espero ter ajudado.
FLAVIOGUILHERME 03/08/2007 12:16:00
#229338 Resposta escolhida
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
'65 equivale a letra "A"
If KeyCode = 65 Then 'esc

MsgBox "ok"
'sua rotina
Else

End If

End Sub
'qual tecla você quer ?
Tópico encerrado , respostas não são mais permitidas
Voltar