Visual Basic de Yerel IP, Yerel Ağ Adı ve Yerel Port Numarası Öğrenme

Öncelikle Project>Components yolunu izleyerek açılan pencerenin Controls bölümünden Microsoft Winsock Controls 6.0 yı araç kutusuna ekleyin
Forma 3 buton ve winsock nesnesini ekleyin.

'1. button yerel ip gösterecek

'2. button yerel ağ adını gösterecek

'3. button yerel port numarasını gösterecek




Private Sub Command1_Click()
cmdip = Winsock1.LocalIP
MsgBox ip
End Sub
Private Sub Command2_Click()
cmdhostname = Winsock1.LocalHostName
MsgBox HostName
End Sub
Private Sub Command3_Click()
cmdport = Winsock1.LocalPort
MsgBox piort
End Sub

Çok Güzel Paylaşım Olmuş Bilmeyenler için çok işe yarar teşekkürler...

Ya nedir bu Visual Basic

Çok güzel programlar yapmak için çok güzel bir program