關于vb.net串口自動識別的信息
VB.NET中如何處理串口通信接收的數(shù)據(jù)？
你可以預先約定一個截止附，讀取的字節(jié)統(tǒng)統(tǒng)放到緩存區(qū)里，直到讀到截止附再處理、顯示。
創(chuàng)新互聯(lián)是一家集網(wǎng)站建設,石河子企業(yè)網(wǎng)站建設,石河子品牌網(wǎng)站建設,網(wǎng)站定制,石河子網(wǎng)站建設報價,網(wǎng)絡營銷,網(wǎng)絡優(yōu)化,石河子網(wǎng)站推廣為一體的創(chuàng)新建站企業(yè)，幫助傳統(tǒng)企業(yè)提升企業(yè)形象加強企業(yè)競爭力?？沙浞譂M足這一群體相比中小企業(yè)更為豐富、高端、多元的互聯(lián)網(wǎng)需求。同時我們時刻保持專業(yè)、時尚、前沿，時刻以成就客戶成長自我，堅持不斷學習、思考、沉淀、凈化自己，讓我們?yōu)楦嗟钠髽I(yè)打造出實用型網(wǎng)站。
VB與VB.NET串口及以太網(wǎng)通迅
關于串口通訊的問題：
很明顯，你還不知道（不會、不習慣）使用事件驅動的方式接收數(shù)據(jù)。
建議你仔細看看串口組件（無論VB6還是VB.net）的OnComm事件，你的問題很容易解決。
關于以太網(wǎng)通訊：
在TCP通訊中端口確實可以重用，你百度一下“TCP端口重用”能查到很多示例。
但絕大多數(shù)情況下不推薦端口重用，而應該采取服務器端建立連接池的方法。
或者，干脆不用TCP，用UDP解決也可以。
怎樣在vb中自動檢測到可用串口號的具體程序代碼
j = 0
For i = 1 To 16 Step 1
If comISP.PortOpen = True Then '先關閉串口
comISP.PortOpen = False
End If
comISP.CommPort = i
On Error Resume Next '說明當一個運行時錯誤發(fā)生時，控件轉到緊接著發(fā)生錯誤的語句之后的語句，并在此繼續(xù)運行。訪問對象時要使用這種形式而不使用 On Error GoTo。
comISP.PortOpen = True
If Err.Number 8002 Then '無效的串口號。這樣可以檢測到虛擬串口，如果用Err.Number = 0的話檢測不到虛擬串口
If j = 0 Then
j = i
End If
cboPort.AddItem "COM" i '生成串口選擇列表
End If
comISP.PortOpen = False
Next i
If j = 1 Then
cboPort.Text = "COM" j '自動打開可用的最小串口號
comISP.CommPort = j
comISP.PortOpen = True
cmdOpenCom.Caption = "關閉串口"
shpCOM.FillColor = vbGreen
If Err.Number = 8005 Then '串口已打開,vbExclamation '
comISP.PortOpen = False
cboPort.Text = ""
cmdOpenCom.Caption = "打開串口"
shpCOM.FillColor = vbRed
End If
End If
vb.net2010十六進制讀取串口的問題
不是很明白你的題意
strHex = strHex + [String].Format("{0:X2} "
這里的意思是把每個字節(jié)數(shù)據(jù)轉換成了十六進制，每個字節(jié)占兩個字符
如果你串口收到的4個字節(jié)數(shù)據(jù)：43,27,56,200
那么你的結果是：2B1B38C8
即receivebytes.Text="2B1B38C8"
不足兩位的補0
如果你串口收到的4個字節(jié)數(shù)據(jù)：3,27,56,200
那么你的結果是：031B38C8
即receivebytes.Text="031B38C8"
vb.net 怎么用事件觸發(fā)的方式讀取串口數(shù)據(jù)
首先：
textbox里沒有顯示，是因為SerialPort1和TextBox2不是同一線程創(chuàng)建的，需要跨線程操作。需要用到委托，這樣才能顯示出來。
其次：
我覺得用串口的接收數(shù)據(jù)事件更好一些。
下面代碼供參考：
'----------------------
'串口接收數(shù)據(jù)事件，其實比用定時器更好，
'觸發(fā)事件的條件可以自己在form_load中設置ReceivedBytesThreshold屬性數(shù)值，默認為ReceivedBytesThreshold=1
Private Sub SerialPort1_DataReceived(ByVal sender As Object, ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) Handles SerialPort1.DataReceived
Dim strRecvData As String = ""
strRecvData = SerialPort1.ReadExisting
Call disPlayComData(strRecvData)
End Sub
Delegate Sub callback(ByVal strT As String) '定義委托
Sub showString(ByVal comdata As String) '顯示結果
Me.TextBox1.Text = "結果：" comdata
End Sub
Sub disPlayComData(ByVal strTmp As String) '判定是否為跨線程
If Me.TextBox1.InvokeRequired Then
Dim d As New callback(AddressOf showString)
Me.Invoke(d, New Object() {strTmp})
Else
Me.TextBox1.Text = strTmp
End If
End Sub
VB.NET使用AxMSComm實現(xiàn)串口通信的發(fā)送讀取問題？
上面的代碼看不出問題，如果初始化串口控件時已經(jīng)注冊了AxMSComm1_OnComm，有數(shù)據(jù)接收應該能觸發(fā)，至于為什么沒有觸發(fā)，要看看你的接收方是否已經(jīng)收到你的發(fā)出指令，是否已經(jīng)有響應數(shù)據(jù)回發(fā)。
建議分開調試，用一個通用的串口助手，如格西烽火串口助手之類的，分別調試你的上位機和下位機。格西烽火串口助手能輕松的定制如你上面的發(fā)送數(shù)據(jù)。
文章名稱：關于vb.net串口自動識別的信息
文章路徑：http://m.jiaotiyi.com/article/hpgdcc.html