三步了解VB.NET串口通讯如何发送接收数据

这里介绍VB.NET串口通讯支持总是让人觉得有所不足，在使用VB6的MsComm32.ocx时，很多人都会在VB.NET的开发中觉得很困扰。

学习VB.NET时，你可能会遇到VB.NET串口通讯问题，这里将介绍VB.NET串口通讯问题的解决方法，在这里拿出来和大家分享一下。VB.NET串口通讯支持总是让人觉得有所不足，在使用VB6的MsComm32.ocx时，很多人都会在VB.NET的开发中觉得很困扰。这里讲述的VB.NET串口通讯类使用native代码，并且它是通API调用实现的，你会发现VB.NET串口通讯就是这么简单。
在说明如何使用这个类前，需要说明的是，本类只是一个VB.NET串口通讯演示，你可能需要根据你的情况修改后使用。另外，本类的目的是通过例子教会你在无需ocx控件和第三方组件的支持下用VB.NET开发串口通讯程序，所有并没有完善的异常错误处理。
1.初始化并打开串口
创建一个CRs232类的实例，并在调用Open方法前设置好串口通讯参数。


Dim moRS232 as New Rs232()  
• With moRs232  
  
  .Port = 1'//Uses COM1  
• 
  .BaudRate = 2400
  
  '//波特率 2400  
• 
  .DataBit = 8
  
  '//8 data bits  
• 
  .StopBit = Rs232.DataStopBit.StopBit_1  
  '//停止位 1  
• 
  .Parity = Rs232.DataParity.Parity_None  
  '//无奇偶校验  
• 
  .Timeout = 500
  
  '//超时时间500 ms  
• End With  
  
• '// 初始化并打开串口  
  moRS232.Open ()  
• '// 串口打开后，你可以随意地控制DTR/RTS  
  
  moRS232.Dtr = True
• 
  moRS232.Rts = True
  
  
2.发送数据
本类为Rx和Tx准备了两个缓冲区(buffer)，发送数据时，只需要设置TxData属性为你需要发送的数据，然后调用Tx方法就可以了。


moRS232.TxData = txtTx.Text  
• moRS232.Tx()
  
3.接收数据
先调用Rx方法（参数为您需要从串口读取的字节数），然后读取RxData属性。


moRS232.Rx(10)  
• '// 从串口通讯缓冲区里读取10字节  
• Dim sRead as String=moRs232.RxData
  
需要注意的是，当本类无法用串口读取到所需的字节数，程序线程在超时异常发生前是锁死的，超时时间通过Timout属性设置。