none
Comandos para fazer com que uma tecla do teclado seja acionada RRS feed

  • Pergunta

  • Gostaria de fazer assim por exemplo:

    Form1_load ....

    timer1.enable= true

    end sub

    timer1.tick

    tecla tab seja acionada  a cada 5 segundos

    depois a tecla shift + tab

    end sub

    end class

    mais ou menos isso: de acordo com o tempo do relogio uma tecla seja executada, sem o usuario precisar apertar, vlw.

    quarta-feira, 5 de dezembro de 2012 22:01

Respostas

  • Use o método SendKeys.Send("Tecla"):

    Para simular o pressionamento da tecla TAB declare assim:  SendKeys.Send("{TAB}".

    Para simular o pressionamento das teclas SHIFT + TAB declare assim:  SendKeys.Send("+{TAB}".

    Veja a documentação: 

    SendKeys.Send Method


    Visual Studio 2010(Vb.Net)

    quarta-feira, 5 de dezembro de 2012 22:28

Todas as Respostas

  • Use o método SendKeys.Send("Tecla"):

    Para simular o pressionamento da tecla TAB declare assim:  SendKeys.Send("{TAB}".

    Para simular o pressionamento das teclas SHIFT + TAB declare assim:  SendKeys.Send("+{TAB}".

    Veja a documentação: 

    SendKeys.Send Method


    Visual Studio 2010(Vb.Net)

    quarta-feira, 5 de dezembro de 2012 22:28
  • Entao cara, eu tentei isto ai, coloquei o comando dentro deu um botao_click e  não funcionou
    quarta-feira, 5 de dezembro de 2012 22:36
  • Poderia postar seu código para eu dar uma olhada?


    Visual Studio 2010(Vb.Net)

    quinta-feira, 6 de dezembro de 2012 09:42
  • entao cara, eu consegui, arrumar vlw ae, ajudou pakas, fikei tentando ai quando fui ver eu tinha esquecido de colocar antes pra ele selecionar o primeiro controle.

    vlw

    sábado, 8 de dezembro de 2012 01:54
  • Posta o código fazendo favor. Estou precisando desenvolver algo assim tambem.
    quarta-feira, 4 de outubro de 2017 12:56
  • Boa noite.

    Veja se ajuda:

        Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
            Timer1.Interval = 5000 'cinco segundos de intervalo
            TextBox1.Focus()
            Timer1.Enabled = True
        End Sub


        Private Sub Timer1_Tick(sender As Object, e As System.EventArgs) Handles Timer1.Tick
            SendKeys.Send("{TAB}") 'a cada cinco segundos será enviado um TAB
        End Sub

        Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
            If Timer1.Enabled = True Then
                Timer1.Enabled = False 'para o timer
            Else
                TextBox1.Focus()
                Timer1.Enabled = True 'reativa o timer
            End If
         End Sub

    quarta-feira, 1 de novembro de 2017 23:58