Question

VB，mscomm通讯，连续执行会下标越界，单独执行不会

Answer 1

出现错误的原因主要是:在连续执行程序时,从串口缓冲中接收的字节数(aa)不一定满足程序中的循环
For i=0 to 7 ,也就是说,当产生 msComm_onComm事件时,缓冲中的字节数不一定每次都是8个字节.
所以程序要修改为:
dim aa() as Byte
For i = 0 To UBound(aa)
bb(i)=Hex(aa(i))
Next

或直接先获得缓冲中的字节数
dim inCount as long
nCount=msComm1.InBufferCount

aa=msComm1.Input
再循环判断...