VB.NET 2005 获取本机HostName、IpAddress、UserName、MachineName

HostName：    System.Net.Dns.GetHostName
UserName：    Environment.UserName
MachineName：     Environment.MachineName
 IpAddress：　　　　 Dim IPAdress As System.Net.IPAddress
  　　　　　　　　　　　　IPAdress = System.Net.Dns.GetHostEntry(System.Net.Dns.GetHostName()).AddressList().GetValue(0) （GetValue(0)代表本机的第一个IP，如果本机有多个IP的话，顺次往下排）