[Tutorial] Criando um spammer

Neste tutorial irei ensinar como fazer um simples spammer , a maioria das pessoas pensa que é complicado mas é a coisa mais facil de fazer...

Então comece por adicionar 2 Labels ,2 Textbox, 1 Button e 1 Timer.

e organize-os desta forma:


Agora dê dois cliques no butão comecar e digite:

Código:

 Try ' Preve erros
            If Timer1.Enabled = False Then ' Se o timer 1 estiver desligado entao:
                If IsNumeric(TextBox2.Text) Then ' Se a textbox do intervalo for numerica então:
                    Timer1.Interval = TextBox2.Text ' O intervalo do timer é igual a textbox2 , Cada 1000 de Interval representa 1 segundo..
                    Timer1.Enabled = True ' Liga o timer
                    Button1.Text = "Parar" ' O Butao "Comecar" muda para "Parar"
                Else ' Caso a textbox do intervalo não for numerica ou for nula
                    MsgBox("O Intervalo tem que ser numerico e não pode ser nulo.") ' Aprensenta a seguinte msgbox..
                End If
            Else ' Se o timer 1 estiver ligado entao:
                Timer1.Enabled = False ' Timer1 Desliga
                Button1.Text = "Começar" ' O Butão "Parar" muda para "Começar"
            End If
        Catch ' Em caso de erro
            MsgBox("Erro, Por favor não utilize caracters especiais", MsgBoxStyle.Critical, "ERRO") ' Apresenta uma msgbox de erro...
        End Try

Agorá dê dois cliques no timer1 e escreva o seguinte:

Código:

 Try ' Preve erros
            SendKeys.Send(TextBox1.Text) ' Faz o spam do seu texto
        Catch ' Em caso de erro
            MsgBox("Erro", MsgBoxStyle.Critical, "ERRO") ' Apresenta uma msgbox de erro...
        End Try

E está pronto, Teste o programa e se divirta ^^
Lembre-se nada é dificil quando entendemos =D