Tutorial Membuat Deteksi IP Komputer dengan VB 6

Posted by Frandy Alensius Wednesday 3 April 2013 0 comments
Bagikan Artikel Ini :

Persiapan :

1. Visual Basic 6.0 << Cari di engkong gugle usahakan yang vull ya
2. Kopi + Rokok << Biar gak mumet Ngopi
3. Lagu om Bob Marley << Biar gak pusing Siul

Tutorial :

1. Buka VB 6 dan pilih standart EXE.
2. Masukkan Komponen Winsock & Microsoft Windows Common Controls 6 (SP6) dengan cara klik kanan pada Toolbox dan pilih Components Untuk lebih jelas lihat gambar berikut :


[Image: 13.JPG]
Beri tanda centang pada Microsoft Winsock Control 6.0 & Microsoft Windows Common Controls 6 (SP6).

3. Masukkan 1 buah progressbar, 1 buah timer, 4 buah label dan 2 buah command button. Atur propertinya sebagai berikut :

>> Progressbar ( Max = 30000)
>> Timer1 (Enabled = False dan Interval = 1000)
>> Label1 (Caption = Waktu)
>> Label2 (Caption = Nama Komputer)
>> Label3 (Caption = IP Komputer)
>> Label4 (Caption = Port)
>> Command1 (Caption = Deteksi)
>> Command2 (Caption = Keluar)

Berikut ini adalah tampilan Form yang telah diubah propertinya :



[Image: 15.JPG]


4. Kode :

PHP Code:
Dim a As IntegerPrivate Sub Command1_Click()
For 
1 To 30000
    ProgressBar1
.Value a
Next a
Timer1
.Enabled True
End Sub
Private Sub Command2_Click()End
End Sub
Private Sub Timer1_Timer()Label1.Caption Format _
    
(Now"HH:MM:SS - dd mmmm yyyy")Label2.Caption "Nama Komputer : " _
    
Winsock1.LocalHostName
Label3
.Caption "IP Komputer : " _
    Winsock1
.LocalIP
Label4
.Caption "Port : " _
    
Winsock1.LocalPort
End Sub 

5. Tes program sederhana ini dengan menekan tombol F5'

NB : Kalo ada masalah silahkan comment di bawah NO JUNK,SPAM,OOUT dll tapi kalo ente nanya ane gak bisa jawabnya jangan marah ya :kamsia :kamsia soalnya masih newbi jadi kalo ada yang mengerti tolong di bimbing :inidia

UPDATE VIDEO IN YOUTUBE


WACH VIDEO


TERIMA KASIH ATAS KUNJUNGAN SAUDARA
Judul: Tutorial Membuat Deteksi IP Komputer dengan VB 6
Ditulis oleh Frandy Alensius
Rating Blog 5 dari 5
Semoga artikel ini bermanfaat bagi saudara. Jika ingin mengutip, baik itu sebagian atau keseluruhan dari isi artikel ini harap menyertakan link dofollow ke http://blueskylens.blogspot.com/2013/04/tutorial-membuat-deteksi-ip-komputer.html. Terima kasih sudah singgah membaca artikel ini.

0 comments:

Post a Comment