【总结】在VB的MSComm控件上读任意字节数据

（1）在Form_Load中设置MSComm1.RThreshold = 1（即接收一个字节就触发接收事件）

（2）在MSComm1的接收事件中，

1.先设置MSComm1.RThreshold = 0（即不触发）

2.再使用

Do

DoEvents

Loop Until MSComm1.InBufferCount >= 16

这样在接收16个字节后，才会往下运行。如果不使用上面的语句，直接判断 MSComm1.InBufferCount 的值，则可能会小于16（因为串口接收数据需要一定的时间）。

3.最后将MSComm1.RThreshold = 1以便下一次事件的触发。