VB.Net by API/System.Net/IPEndPoint

Материал из VB Эксперт
Перейти к: навигация, поиск

IPEndPoint.Address

<source lang="vbnet"> 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


 </source>


IPEndPoint.AddressFamily

<source lang="vbnet"> 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


 </source>


IPEndPoint.Serialize()

<source lang="vbnet"> 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


 </source>


New IPEndPoint

<source lang="vbnet"> 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


 </source>