多线程检测IP端口是否存在源码

.如果真 (端口检测 (81, IP数组 [计次]))
加入日志 (IP数组 [计次] ＋ “:81”)
进入许可区 (xcs)
列表框1.加入项目 (IP数组 [计次] ＋ “ √”, )
列表框1.现行选中项 ＝ 列表框1.取项目数 ()
退出许可区 (xcs)
.如果真结束
进入许可区 (xcs)
线程 ＝ 线程 － 1
列表框1.加入项目 (IP数组 [计次] ＋ “ X”, )
列表框1.现行选中项 ＝ 列表框1.取项目数 ()
退出许可区 (xcs)