öncelikle Project>Components yolunu izleyerek açılan pencerenin Controls bölümünden Microsoft Winsock Controls 6.0 (SP6) yi araç kutusuna ekleyin
Forma buton ve winsock nesnesini ekleyin.
Aşağıdaki kodları yazın
Private Sub Command1_Click()
ip = Winsock1.LocalIP
MsgBox ip
End Sub
Forma buton ve winsock nesnesini ekleyin.
Aşağıdaki kodları yazın
Private Sub Command1_Click()
ip = Winsock1.LocalIP
MsgBox ip
End Sub
