可不可以这样:
再发送事件里!
senddata() as byte
senddata(0)=xx
senddata(2)=xx
.
.
senddata(max)=xx
recdata(17) as byte
bytelen as integer
for i=1 to addmax
senddata(1)=i
com.write(senddata,0,senddata.lengh)
do until i=10(判断超时用)or bytelen = 定字长
读字节,判断字长
sleep 50
i+=1
loop
if i >=10 then
超时
else
处理数据
end if
sleep 100,;轮询间隔