作者timohu (随便说说)
看板Visual_Basic
标题Re: [VB6 ] MSComm元件的问题...
时间Tue Sep 26 10:58:45 2006
: Form1.MSComm1.OutBufferCount = 0
: Form1.MSComm1.Output = "xxxx" + vbCr
: Delay 10000
: a = Form1.MSComm1.Inpu
我的方法是这样的：
如果你可以预期接收到的资料长度
那可以这样写
Form1.MSComm1.Output = "xxxx" + vbCr
Do
DoEvents
Loop Until Form1.MSComm1.InBufferCount >= 8 ' <==长度
a = Form1.MSComm1.Input
如此一来
在Do、Loop之间就可以自己在加个Timer
设定在固定时间内没有收到预期的长度的资料就算是Timeout
Timer时间就要看设备间的传送速度来决定了
这样也可以不需要用到Delay来拖慢程式的速度
以上也是我自己之前乱搞的
希望有人可以提供一些更好的办法～～
: 顺便问一个Timer的问题...
: 请问timer的时间间格....
: 是指上一个timer"结束"到下一个timer"开始"的时间吗??
: 还是上一个timer"开始"到下一个timer"开始"的时间??
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 59.124.129.194