Dim objEntry As System.Net.IPHostEntry = _
System.Net.Dns.GetHostByName( _
System.Net.Dns.GetHostName)
Dim strIP As String = CType( _
objEntry.AddressList.GetValue(0), _
System.Net.IPAddress).ToString
MessageBox.Show("Your IP address is " & strIP)
System.Net.Dns.GetHostByName( _
System.Net.Dns.GetHostName)
Dim strIP As String = CType( _
objEntry.AddressList.GetValue(0), _
System.Net.IPAddress).ToString
MessageBox.Show("Your IP address is " & strIP)
تعليقات
إرسال تعليق