端口扫描，针对特定IP

txtIp

txtPort1

txtPort2

txtResult


首先打开VB的编辑画面，加入扫描软件的主角winsock控件

（加入步骤：点“工程”->“部件”找到并选中“Microsoft Winsock Control 6.0”，然后在左侧的工具箱内即可见到它的小图标）

在界面上添加两个文本框，一个用于输入想扫描的IP，另一个用于输入想扫描的端口范围；添加一个按钮用于控制何时开始扫描，

添加一个winsock控件，添加的方法：双击欲使用的控件即可，注意设置winsock控件时在index处需要加一个0，这是因为同时启动多个

winsock控件的实例，第一系数为0

然后简单设置一下，节约时间我已经做好了，以下为代码部分：
--------------------------------------------------------
'代码如下，看不懂的也可以联系我



Public Ip
Public Port1
Public Port2