Visual Basic Gelişmiş Hwıd Sistem Yapımı


Visual Basic ve .NET Framework    Visual Basic ve .NET Framework İle İlgili Paylaşım Kategorisi

Yazar: x60    52 Yorum    1986 Görüntüleme
  • Derecelendirme: 0/5 - 0 oy

Paylaşım Tarihi: 19.03.2016, 17:31:55 #1
x60 #Requiem
Cezalı Üye
Status: Çevrimdışı Yorumları:544 Konuları:160 Kayıt Tarihi:18.11.2015

1 Adet Label  1 Adet GrupBox  2 Adet Buton   1 Adet ProgressBar  ve 1 Adet Timer Lazım
Kodlar
[hide]

PHP 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


Buton Kod : HW ID Ögren

PHP Kod:
WebBrowser1.Navigate("http://siteadresi.com/program/HWID.txt")
        TextBox1.Text = My.Computer.Info.TotalPhysicalMemory & My.Computer.Info.TotalVirtualMemory

Buton 2 Giriş Yap

PHP Kod:
1
2
3
4
5
6
7
8
9
10
11
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

Timer Kod :

PHP Kod:
1
2
3
4
5
6
7
8
9
10
11
12
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

[/hide]


Paylaşım Tarihi: 19.03.2016, 17:36:49 #2
wofle54 Delikanlı
Kayıtlı Üye
Status: Çevrimdışı Yorumları:58 Konuları:4 Kayıt Tarihi:27.01.2016 Rep Puanı: 1

Bakalım eyvallah

Paylaşım Tarihi: 23.03.2016, 21:43:44 #3
mehmetbabas Delikanlı
Kayıtlı Üye
Status: Çevrimdışı Yorumları:70 Konuları:9 Kayıt Tarihi:02.01.2016 Rep Puanı: 0

teşekkürler. saolun

Paylaşım Tarihi: 23.03.2016, 22:05:01 #4
slowbeta12345 Delikanlı
Kayıtlı Üye
Status: Çevrimdışı Yorumları:72 Konuları:1 Kayıt Tarihi:29.01.2016 Rep Puanı: 1

Güncel teşekkürler

Paylaşım Tarihi: 25.03.2016, 20:30:17 #5
DeliKral66 Yeğen
Kayıtlı Üye
Status: Çevrimdışı Yorumları:23 Konuları:0 Kayıt Tarihi:07.03.2016 Rep Puanı: 0

saol inş çalışır tşkk

Paylaşım Tarihi: 25.03.2016, 20:52:37 #6
AnılTheHacker Delikanlı
Onaylı Uye
Status: Çevrimdışı Yorumları:94 Konuları:10 Kayıt Tarihi:28.02.2016 Rep Puanı: 3

eyw sağolasın

Paylaşım Tarihi: 25.03.2016, 20:54:01 #7
bedoalp Yeğen
Kayıtlı Üye
Status: Çevrimiçi Yorumları:50 Konuları:3 Kayıt Tarihi:17.01.2016 Rep Puanı: 2

bakalım bakalıımmmmmmmmm

Paylaşım Tarihi: 25.03.2016, 20:55:51 #8
gundemir27 Cezalı Üye
Cezalı Üye
Status: Çevrimdışı Yorumları:15 Konuları:0 Kayıt Tarihi:21.02.2016

tsk ssssssssssssssssssssss










Aradığınızı Bulamadınız Mı ?

Konuyu Okuyanlar:
1 Ziyaretçi