[VB.NET]如何获取主机名

<script type="text/javascript"><!--google_ad_client = "pub-8333940862668978";/* 728x90, 创建于 08-11-30 */google_ad_slot = "4485230109";google_ad_width = 728;google_ad_height = 90;//--></script><script type="text/javascript"src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script>

1. Dim hostInfo As System.Net.IPHostEntry = System.Net.Dns.GetHostByName(TextBox1.Text)
2.         MessageBox.Show(hostInfo.AddressList(0).ToString, "主机地址", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
3.         '从域名到IP地址的转换
4. Dim myIP As System.Net.IPAddress = System.Net.IPAddress.Parse(TextBox2.Text)
5.         Dim hostInfo As System.Net.IPHostEntry = System.Net.Dns.GetHostByAddress(myIP)
6.         MessageBox.Show(hostInfo.HostName.ToString, "主机域名", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
7.         '从IP地址到域名的转换()