VB winsock群发信息

来源:百度知道 编辑:UC知道 时间:2024/05/15 08:47:46
我定义了一个sock(15)控件
If aaa(Index) = "e" Then '这里是我自己定义的标志 index是控件的对应号码
ddata = "6" + "." + ddata '将index发送来的数据修改下
For i = 0 To 14
If index<>i Then
sock(i).SendData ddata '发送数据
End If
Next i
End If
为何我运行后`sock(0)发来的信息可以发给sock(1)以及之后的控件.但像是sock(3)发来的信息`就无法发到sock(0),1`2``
这是为什么?``

记得我刚学用winsock时也遇到这个问题,
记住,如果在for下面用senddata,就在senddata的后面退一句:
doevents
这个语句的作用是:先执行完未执行完毕的语句..
VB里有很多时候都会这样的,以后要是你发现哪一句又没被执行到,就在那一句后面跟一句doevents就可以了