标题：如何获取局域网内本机的IP?

Dim IPAdress As System.Net.IPAddress
Dim HostName As String
HostName = System.Net.Dns.GetHostName '获得本机的机器名
IPAdress = System.Net.Dns.GetHostByName(HostName).AddressList.GetValue(0) '获得本机的IP
OutPut.Show( HostName )  '本机机器名
OutPut.Show(IPAdress.ToString )  '本机的IP

借花献佛了。