VB6串口编程如何实现数据传输?