KULLANICI ADI : ŞİFRE Şifremi Unuttum*

Anasayfa İLLEG4L BANK KREDİ SATIN AL İLLEG4LİZM RAP Sub Domain Bulucu Arama Yap Yeni Konular Bugünki Konular

Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Visual Basic Gelişmiş Hwıd Sistem
Konu : Visual Basic Gelişmiş Hwıd Sistem - 13.09.2015, 01:12
Mesaj: #1
Evet arkadaşlar bugün Gelişmiş Hwıd Sistem öğrenicez.

--İlk olarak gerekli malzemeler--
2 Adet Label 1 Adet GroupBox 2 Adet Button 1 Adet ProgressBar 1 Adet Timer


--Girilecek Yazılar--
Kod:
Kod:
Label1 = Hwıd Öğren
Label2 = Boş Bırakın [Videoya Bakın]
Button1 = Hwıd Öğren
Button2 = Giriş Yap
GroupBox = Ne Yaparsan Yap :D




--Button1 [Hwıd Öğren]--
Kod:
Kod:
WebBrowser1.Navigate("http://siteadresi.com/program/HWID.txt")
        TextBox1.Text = My.Computer.Info.TotalPhysicalMemory & My.Computer.Info.TotalVirtualMemory



--Button2 [Giriş Yap]--
Kod:
Kod:
Dim a As String
        Dim b As String
        a = TextBox1.Text
        b = InStr(WebBrowser1.DocumentText, a)
        If b Then
            WebBrowser1.Focus()
            MsgBox("Kayıdınız Aktif")
            Form2.Show
        Else
            MsgBox("Kayıtlı Değilsiniz.!")
        End If



--Timere Girilecek Kodlar--
Kod:
Kod:
If ProgressBar1.Value = ProgressBar1.Maximum Then
            ProgressBar1.Value = 100
            GroupBox1.Enabled = True
            Timer1.Stop()
        Else
            ProgressBar1.Value = ProgressBar1.Value + 1

        End If
        Label2.Text = "%" & ProgressBar1.Value
xThen, üyesi illegalizm | Private illegal Topluluk - Hack forum,Warez Scriptler forumlarına 11.07.2015 tarihinde katılmıştır.

WWW Alıntı ile Cevapla


Hızlı Menü:


Konuyu Okuyanlar: 1 Ziyaretçi
hd porno antalya escort türk ifşa porno izle türk ifşa porno samsun escort izmir escort ataşehir escort türk ifşa hd porno