本文整理汇总了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