是什么？
它是一种完全面向对象的编程语言，基于。N
关于VB的网络编程？
privateSubsckserver_connectionrequest(Index为整数，ByValrequestID为长整型)
DimsipAsString
将I标注为整数
Sipsckserver(0)。RemoteHostIP获取登录的IP地址。
我1
请检查是否已经有此地址的记录。
如果sckserver(i)。remotehostipsip然后存在，没有必要加载新的控件。
如果sckserver(I)。当时状态ltgt关闭
sckserver(I)。关闭
sckserver(I)。接受requestID
接受带有requestID参数的连接。
如果…就会结束
出口接头
如果…就会结束
我我1
环
否则，加载一个新的控件。
sckserver(I)。接受requestID
末端接头
对于I1To-1
如果sckserver(I)。当时状态ltgt关闭
Dimstata作为字符串
stata文本2。文本
sckserver(I)。发送数据stata
如果…就会结束
然后