Mega Code Archive

 
Categories / VB.Net by API / System Net
 

New IPEndPoint

Imports System.Net 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     End Sub End Class