THT DUYURU

Visual Basic Öğrenilmesi ve kullanışı kolay olan Visual Basic’in dökümanlarının ve open source projelerin paylaşım alanı.

chat
Seçenekler

Reklam Tıklama Zorunluluğu // Phemis

Rhotav - ait Kullanıcı Resmi (Avatar)
Researcher
Üyelik tarihi:
12/2017
Mesajlar:
2.551
Konular:
166
Teşekkür (Etti):
1103
Teşekkür (Aldı):
839
Ticaret:
(0) %
29-03-2018 19:42
#1
Reklam Tıklama Zorunluluğu // Phemis
Merhabalar Arkadaşlar Bugün Sizlere Bir Projeye Nasıl Zorunlu Olarak Reklam Eklersiniz Şimdi Size Onu Göstereceğim.

Ö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()



M3m0ry, ATABÖRÜ, S10Kinq, keyloggertc Teşekkür etti.
M3m0ry - ait Kullanıcı Resmi (Avatar)
Junior Çevirmen
Üyelik tarihi:
06/2017
Mesajlar:
4.018
Konular:
296
Ticaret:
(0) %
Justredhack - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
12/2017
Yaş:
23
Mesajlar:
382
Konular:
33
Teşekkür (Etti):
14
Teşekkür (Aldı):
43
Ticaret:
(0) %
29-03-2018 19:42
#3
eline saglık yararlı konu
--------------------- Bayrağımızı sevmeyenlere direğini hediye ediyoruz.

©Justredhack™
Rhotav - ait Kullanıcı Resmi (Avatar)
Researcher
Üyelik tarihi:
12/2017
Mesajlar:
2.551
Konular:
166
Teşekkür (Etti):
1103
Teşekkür (Aldı):
839
Ticaret:
(0) %
29-03-2018 19:53
#4
Teşekkürler Arkadaşlar

Teşekkürler.

Güncel

Önemli Değil.
Konu 'Adige tarafından (01-04-2018 03:52 Saat 03:52 ) değiştirilmiştir.
PALA - ait Kullanıcı Resmi (Avatar)
Özel Üye
Üyelik tarihi:
03/2018
Mesajlar:
12.731
Konular:
238
Teşekkür (Etti):
482
Teşekkür (Aldı):
2927
Ticaret:
(0) %
29-03-2018 19:57
#5
Başarılı,eline sağlık.
DarkMisyon - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
01/2016
Nereden:
Londra
Mesajlar:
1.456
Konular:
108
Teşekkür (Etti):
211
Teşekkür (Aldı):
124
Ticaret:
(0) %
29-03-2018 21:33
#6
Çok teşekkürler
--------------------- White
ATABÖRÜ - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
07/2017
Nereden:
Ötüken
Yaş:
83
Mesajlar:
3.370
Konular:
303
Teşekkür (Etti):
950
Teşekkür (Aldı):
912
Ticaret:
(0) %
30-03-2018 21:03
#7
Elinize Sağlık Hocam
---------------------
Ey Türk milleti! Kendine dön! Sen yükseltmiş Bilge Kağan'ına, hür ve müstakil ülkene karşı hata ettin, kötü duruma düşürdün. Milletin adı, sanı yok olmasın diye Türk milleti için gece uyumadım, gündüz oturmadım. Kardeşim Kül Tegin ve iki şad ile ölesiye bitesiye çalıştım.
Rhotav Teşekkür etti.

Bookmarks


« Önceki Konu | Sonraki Konu »
Seçenekler