我编一个串口通讯的程序,接受一个单片机的数据,程序总出错,但是在接收时加一个中断,就能得到正确的结果,vb可不可以实现虚拟中断,我试了延迟,但是不行,清高手指教!!!
部分程序如下:
byin = MSComm1.Input For i = LBound(byin) To UBound(byin)?? ,在这加中断能得到正确结果
If byin(i) < 16 Then Text1.Text = Text1.Text & ("0" & Hex(byin(i))) & " "
Else: Text1.Text = Text1.Text & Hex(byin(i)) & " " End If b(j) = byin(i) j = j + 1 Next i

|