在VB6.0下利用串口控件实现串口通信,最终两个串口之间能够收发自定义消息