Dim HostName As String = System.Net.Dns.GetHostNameDim LocalIPAddress As System.Net.IPAddress = System.Net.Dns.GetHostByName(HostName).AddressList.GetValue(0)
Msgbox(LocalIPAddress)
加好友 
发短信
Post By：2012/10/12 9:03:00 [只看该作者]
