【总结】在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以便下一次事件的触发。