當前位置: 首頁>>代碼示例>>VB.NET>>正文


VB.NET TcpState枚舉代碼示例

本文整理匯總了VB.NET中System.Net.NetworkInformation.TcpState枚舉的典型用法代碼示例。如果您正苦於以下問題:VB.NET TcpState枚舉的具體用法?VB.NET TcpState怎麽用?VB.NET TcpState使用的例子?那麽, 這裏精選的枚舉代碼示例或許可以為您提供幫助。


在下文中一共展示了TcpState枚舉的1個代碼示例,這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚,您的評價將有助於係統推薦出更棒的VB.NET代碼示例。

示例1: CountTcpConnections

Public Shared Sub CountTcpConnections() 
    Dim properties As IPGlobalProperties = IPGlobalProperties.GetIPGlobalProperties()
    Dim connections As TcpConnectionInformation() = properties.GetActiveTcpConnections()
    Dim establishedConnections As Integer = 0
    
    Dim t As TcpConnectionInformation
    For Each t In  connections
        If t.State = TcpState.Established Then
            establishedConnections += 1
        End If
        Console.Write("Local endpoint: {0} ", t.LocalEndPoint.Address)
        Console.WriteLine("Remote endpoint: {0} ", t.RemoteEndPoint.Address)
    Next t 
    Console.WriteLine("There are {0} established TCP connections.", establishedConnections)

End Sub
開發者ID:VB.NET開發者,項目名稱:System.Net.NetworkInformation,代碼行數:16,代碼來源:TcpState


注:本文中的System.Net.NetworkInformation.TcpState枚舉示例由純淨天空整理自Github/MSDocs等開源代碼及文檔管理平台,相關代碼片段篩選自各路編程大神貢獻的開源項目,源碼版權歸原作者所有,傳播和使用請參考對應項目的License;未經允許,請勿轉載。