ipアドレスとホスト名表示ツール　VB.NET入門

ipとホスト名を簡単に表示できるツールを作成しようと思いました。
自分で書こうと思ったんですが今回は引用してみました。
使ってるフレームワークをリンクしてみました。

http://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q14140445074

一行目でSystem.Netクラスをインポートしてます。
ホスト名はDns.GetHostNameというホスト名を取得するクラスを使ってます。
https://msdn.microsoft.com/ja-jp/library/system.net.dns.gethostname(v=vs.110).aspx

IPAddressもクラスを配列を選択してます。

https://msdn.microsoft.com/ja-jp/library/system.net.ipaddress(v=vs.110).aspx

HostIP = Dns.GetHostEntry(HostName).AddressList
https://msdn.microsoft.com/ja-jp/library/ms143998(v=vs.110).aspx
https://msdn.microsoft.com/ja-jp/library/system.net.iphostentry.addresslist(v=vs.110).aspx

クラスの配列の繰り返しとエラーチェック

http://logicalerror.seesaa.net/article/159219097.html

https://msdn.microsoft.com/ja-jp/library/system.net.sockets.addressfamily(v=vs.110).aspx

Imports System.Net
Public Class Form1

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim HostName As String = Dns.GetHostName()
TextBox1.Text = “ホスト名：” & HostName

Dim HostIP() As IPAddress
HostIP = Dns.GetHostEntry(HostName).AddressList

For idx As Integer = 0 To HostIP.Length – 1
If HostIP(idx).AddressFamily = Net.Sockets.AddressFamily.InterNetwork Then
TextBox2.Text = “IPアドレス：” & HostIP(idx).ToString
End If
Next
End Sub