VB.Net Kullanıcı şifre ve Hwıd giriş paneli

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--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]--WebBrowser1.Navigate("http://siteadresi.com/program/HWID.txt")
       TextBox1.Text = My.Computer.Info.TotalPhysicalMemory & My.Computer.Info.TotalVirtualMemory

--Button2 [Giriş Yap]--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--

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 

--Videolu Anlatım--   

--İndirme Linki--
Projeyi İndirmek İçin Tıkla
Alternatif Link İçin Tıkla