VB2008串口发送和接收数据,具体的代码,简单的实例