主题：如何判断自己的机器的IP是外部地址还是内部地址，及设置路由器映射端口

获取内网本机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