作者maddison (Maddison)
看板Visual_Basic
标题[.NET] VB2005 SerialPort相关问题
时间Wed Oct 28 15:54:50 2009
小弟想请教一个VB2005 SerialPort.Readline的问题，
最近想要将一个USB装置的资料读入，使用到了
SerialPort.Readline这个指令，但是发现到一个问题
如果装置回应过慢、或在回应过程中发生了错误，造成
SerialPort.Readline无法正常的抓到由装置发出的
Newline指令，就会造成整个程试当在Readline这个指令
上，一直等待newline。
小弟想请问一下可以用什麽方法来避免这种情况发生呢?
谢谢^^
附上程式码中的片段：
serialport1.write("READ?" & chr(10))
'等一秒让资料接收完成
Dim WaitTime as Date = Now.AddSeconds(1)
Do
Loop Until Now >= WaitTime
if serialport1.ByteToRead = 27 then
Data = serialport1.readline<----※读入资料没读到Newline时就当在这
...
..
..
.
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 114.37.105.231
1F：→ nobody1:do loop要防呆呀~ 10/29 18:44