（1）在Form_Load中设置MSComm1.RThreshold=1（即接收一个字节就触发接收事件）
（2）在MSComm1的接收事件中，
1.先设置MSComm1.RThreshold=0（即不触发）
2.再使用
Do
DoEvents
LoopUntilMSComm1.InBufferCount>=16
这样在接收16个字节后，才会往下运行。如果不使用上面的语句，直接判断MSComm1.InBufferCount的值，则可能会小于16（因为串口接收数据需要一定的时间）。
3.最后将MSComm1.RThreshold=1以便下一次事件的触发。
原文链接：https://www.f2er.com/vb/259257.html