【文件属性】：
文件名称：VB6.0 监控计算机TCP/IP端口.rar
文件大小：3KB
文件格式：RAR
更新时间：2022-07-30 13:11:23
VB源码-系统相关
VB6.0 监控计算机TCP/IP端口，监控电脑当前打开的端口，显示在列表中。这个监控程序比较简单，以下是相关的代码：
Dim x As Integer
List1.Clear
For x = 1 To 2000
DoEvents
Winsock1.LocalPort = x
On Error Resume Next
Winsock1.Connect
If Err.Number = 10048 Then
List1.AddItem x
End If
Winsock1.Close
Next x
End Sub
可下载完整源码包查看。
【文件预览】：
codesc.net
----监控计算机TCPIP端口()
--------Form1.frm(2KB)
--------工程1.vbp(689B)
--------工程1.PDM(4KB)
--------MSSCCPRJ.SCC(190B)
--------工程1.vbw(53B)