Visual Basic Reklam Tıklama Programı Yaptırma

Öncelikle Üç Adet Form Oluşturalım Ve Bu Formlardan İlk'ine :

Button2'nin Enabled Değerini False Olarak Ayarlamalıyız.

1 Adet Label
1 Adet Timer
2 Adet Button
1 Adet Picture Box

1. Form İşlev = Anaform Yani Kullanıcının Uygulamayı Açtığı Anda Karşılaşacağı Form
2.Form İşlev = Reklam Aktifleştirme Form'u(İçinde WebBrowser Bulunan Form)
3.Form İşlev = Reklam Aktifleştirdikten Sonra Uygulamanın Yapacağı Asıl İşlev Olan Form



Daha Sonra Reklam Aktif Formuna Gelelim Yani İkinci Form'a Ve WebBrowser'a Sadece Bir Kez Tıklayıp Properties Kısmındaki Url Yerine Reklam Linkimizi Yapıştıralım.

İkinci Form'a Sadece WebBrowser Ekliyiceksiniz Ve Properties Kısmından Size Kısmını = 1366;768
ControlBox Kısmını = False Yapacaksınız.


Daha Sonrasında WebBrowser'ımıza İki Kere Tıklayıp Kod Bölümüne Gelelim Ve Şu Kodu Yazalım.

WebBrowser1_********Completed
Olan Yer Kod Bölümümüz.

Kod:

If WebBrowser1.Url.ToString = "https://www.youtube.com/" Then Form1.PictureBox.BackColor = Color.Lime Me.Close() End If

Önemli Açıklama :
Buraya Yazdığım https://youtube.com Olan Yer Reklamı Geç Dedikten Sonra Gidilecek Yerdir.AnaFormumuza Giriş Yapıp Timer1'in Enabled Değerini True Yapalım Başka Bir Şeye Dokunmamıza Gerek Yok (Interval 100 Olarak Kalabilir)

Timer1.Tick Kodları :

Kod:

İf PictureBox.Backcolor = Color.Lime Then Button2.Enabled = True End İf

Button2'nin Kodlarına :

Kod:

Form3.Show()

Visual Basic Spam Programı

1 adet textbox ekleyip multiline özelliği açıyoruz.

2 adet button = 1. Başlat 2. Durdur ismi veriyoruz.

1 adet timer ekliyoruz.

KODLARIMIZ :

Alıntı:

Public Class Form1 Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick SendKeys.Send(TextBox1.Text) End Sub Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click Timer1.Start() End Sub Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click Timer1.Stop() End Sub End Class

Kullanım : 

Text Box a herhangi birşey yazınız başlat a tıklayın ardından spam yapmak istediğiniz not defteri veya yorum kısmı vs istediğiniz yere mouse ile tıklayınız kendi kendine tekrar edecektir.