Ir para conteúdo
Fórum Script Brasil

Matheus Montinnê

Membros
  • Total de itens

    1
  • Registro em

  • Última visita

Sobre Matheus Montinnê

Matheus Montinnê's Achievements

0

Reputação

  1. Olá pessoa eu estou tentando fazer um programa que envie mensagens definidas na textbox a cada 5 segundo. (Um auto digitador) porém eu só consigo fazer com que ele digite a mensagem escrita na TextBox1 e não digita a mensagem da TextBox2. Eu queria fazer com que após digitar o texto da TextBox1, ele aguardasse 5 segundo e digitasse o codigo da TextBox2. Outra coisa também é que ele está só colando o texto, eu queria fazer com que simulasse uma digitação real. Sou novato, passei o dia tentando e não consegui. se alguém pode me ajudar segue o codigo abaixo: Public Class Form1 Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick If Timer2.Interval = True Then Timer1.Stop() End If Select Case TextBox1.Text() Case TextBox1.Text SendKeys.Send(TextBox1.Text + "{Enter}") End Select End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Timer1.Interval = 5000 'cinco segundos de intervalo Timer1.Enabled = True End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Timer1.Stop() End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick If Timer1.Interval = True Then Timer2.Stop() End If End Sub End Class
×
×
  • Criar Novo...