Public Class Tester Public Shared Sub Main Dim ipAddr As System.Net.IPAddress Dim ipEndPoint As System.Net.IPEndPoint Dim socketAddr As System.Net.SocketAddress
Try
ipAddr = IPAddress.Parse("127.0.0.1")
ipEndPoint = New System.Net.IPEndPoint(ipAddr, 12345)
socketAddr = ipEndPoint.Serialize()
Console.WriteLine("Address Family: " & ipEndPoint.AddressFamily.ToString)
Console.WriteLine("IP:Port: " & ipEndPoint.Address.ToString & ":" & ipEndPoint.Port.ToString)
Console.WriteLine("SocketAddress : " & socketAddr.ToString()) Catch ex As Exception
Console.WriteLine(ex.StackTrace.ToString) End Try