Membuat IP Addres mengunakan VIsual basic 6.0

Seperti orang computer juga memiliki Identitas sendiri yang disebut dengan IP addres yang membedakan computer satu dengan computer lainya . Dan pada kesempatan kali ini saya akan menjelaskan bagaimana membuat IP Addres mengunakan Visual Basic 6.0 .
Pertama buka Visual Basic 6.0 kemudian pilih Standart EXE , setelah muncul Form baru maka anda harus menambahkan Komponen baru yaitu Microsoft Winsock Control 6.0 dengan Cara menekan CTRL + T . setelah menambahkan komponen baru maka anda tinggal menambahkan :
- Command 1
- Command 2
- Label 1
- Text 1
- Winsock 1

Anda tinggal mengubah Propertinya , Caption Display pada command 1 dan pada Comman 2 anda ganti caption nya dengan Clear. Setelah semuanya anda ubah , Anda tinggal memasukkan Code berikut pada Form tersebut .
‘Code
Private Sub Command1_Click()
If Text1.Text = "" Then
Command1.Enabled = False
Text1.Text = Winsock1.LocalIP
Else
Command1.Enabled = True
End If
End Sub
Private Sub Command2_Click()
Text1.Text = ""
If Text1.Text = "" Then
Command1.Enabled = True
Else
Command1.Enabled = False
End If
End Sub
Private Sub Form_Load()
Text1.Text = ""
If Text1.Text = "" Then
Command1.Enabled = False
Else
Command1.Enabled = True
End If
Text1.Text = Winsock1.LocalIP
End Sub

Setelah selesai memasukkan kode tersebut Anda tinggal menjalankanya saja yaitu dengan MengClick F5 pada KeyBoard anda .
Sekian dulu Pembahasan saya buat Kalau kurang mengerti Anda tinggal Commend aj……..