如何解決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屬性設置。

感謝你能夠認真閱讀完這篇文章，希望小編分享的“如何解決VB.NET串口通訊問題”這篇文章對大家有幫助，同時也希望大家多多支持億速云，關注億速云行業資訊頻道，更多相關知識等著你來學習!