客户端发一次,服务端收一次sub form loadi=0end sub接收段程序如下dim str as string dim a(0 to 10) as stringwinsock1.getdata stra(i)=stri=i+1if i=10 then i=0
doevents在两台电脑相连时没起到作用楼上的说笑了,我那只是一个例子,实际情况下肯定不是数字了