Mengetahui IP windows di VB 6.0

dibawah ini source code untuk mengetahui IP yang kita pakai :
Private Sub Command1_Click()
MsgBox “IP Address = ” & Winsock1.LocalIP & vbCrLf & _
“HostName = ” & Winsock1.LocalHostName, _
vbInformation, “IP Address dan HostName”
End Sub
sebelumnya buat 1 aplikasi, 1 form dan 1 commandbutton
ok.