vb.net 串口收發(fā)數據有問題

不知道你是不是用51單片機往串口發(fā)數據，是的話那是因為51的sbuf最多存放8個字節(jié)，所以你發(fā)12個字節(jié)會分成兩次發(fā)完。還有在接收的時候最好定義好通信協(xié)議，比如加一個偵頭，一個偵尾，通過這兩個字節(jié)的內容來接收數據。

創(chuàng)新互聯(lián)建站是創(chuàng)新、創(chuàng)意、研發(fā)型一體的綜合型網站建設公司，自成立以來公司不斷探索創(chuàng)新，始終堅持為客戶提供滿意周到的服務，在本地打下了良好的口碑，在過去的10多年時間我們累計服務了上千家以及全國政企客戶，如陽光房等企業(yè)單位，完善的項目管理流程，嚴格把控項目進度與質量監(jiān)控加上過硬的技術實力獲得客戶的一致贊譽。

老兄，提問還是給點懸賞分嘛，不要吝嗇哪點分，知識是無價的，你給得越多，回答你的人才會越多。

vb.net SerialPort控件接收數據問題，用串口調試助手發(fā)數據，只有第一次可以正常接收

你定義的委托需要帶參數才行，DataReceived事件中沒有接收數據代碼，下面的代碼經測試可用

Delegate Sub SetTextCallback(ByVal InputString As String)

Private Sub ShowString(ByVal comData As String)

txt_Rect.Text += comData '將收到的數據入接收文字框中

txt_Rect.SelectionStart = txt_Rect.Text.Length

txt_Rect.ScrollToCaret()

End Sub

Private Sub SerialPort1_DataReceived(ByVal sender As Object, ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) Handles SerialPort1.DataReceived

Dim inData As String = SerialPort1.ReadExisting

Dim d As New SetTextCallback(AddressOf ShowString)

BeginInvoke(d, inData)

End Sub

VB.net串口通訊接收數據寫法

Do

Application.DoEvents()

Loop?Until?MSComm1.InBufferCount?=?13

Dim?a?As?String?=?MSComm1.Input

Label1.Caption?=?a.Substring(1,?9)

Label2.Caption?=?a.Substring(10,?3)