串口通信最終都是用二進(jìn)制傳輸?shù)?,你用代碼把二進(jìn)制轉(zhuǎn)化成十六進(jìn)制就可以了。不需要額外設(shè)置。
發(fā)展壯大離不開廣大客戶長期以來的信賴與支持,我們將始終秉承“誠信為本、服務(wù)至上”的服務(wù)理念,堅持“二合一”的優(yōu)良服務(wù)模式,真誠服務(wù)每家企業(yè),認(rèn)真做好每個細(xì)節(jié),不斷完善自我,成就企業(yè),實(shí)現(xiàn)共贏。行業(yè)涉及成都花箱等,在網(wǎng)站建設(shè)公司、成都全網(wǎng)營銷推廣、WAP手機(jī)網(wǎng)站、VI設(shè)計、軟件開發(fā)等項目上具有豐富的設(shè)計經(jīng)驗。
有串口控件MSComm控件
MSComm 控件示例
下面這個簡單的例子演示了用調(diào)制解調(diào)器進(jìn)行基本的串行通訊:
Private Sub Form_Load ()
' 保存輸入子串的緩沖區(qū)
Dim Instring As String
' 使用 COM1。
MSComm1.CommPort = 1
' 9600 波特,無奇偶校驗,8 位數(shù)據(jù),一個停止位。
MSComm1.Settings = "9600,N,8,1"
' 當(dāng)輸入占用時,
' 告訴控件讀入整個緩沖區(qū)。
MSComm1.InputLen = 0
' 打開端口。
MSComm1.PortOpen = True
' 將 attention 命令送到調(diào)制解調(diào)器。
' Chr$函數(shù):返回 String,其中包含有與指定的字符代碼相關(guān)的字符 。
MSComm1.Output = "ATV1Q0" Chr$(13) ' 確保
' 調(diào)制解調(diào)器以"OK"響應(yīng)。
' 等待數(shù)據(jù)返回到串行端口。
Do
DoEvents
Buffer$ = Buffer$ MSComm1.Input
Loop Until InStr(Buffer$, "OK" vbCRLF)
' 從串行端口讀 "OK" 響應(yīng)。
' 關(guān)閉串行端口。
MSComm1.PortOpen = False
End Sub
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)
文章題目:vb.net編寫串口通訊,vb串口編程
當(dāng)前路徑:http://aaarwkj.com/article46/dsshchg.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站設(shè)計公司、手機(jī)網(wǎng)站建設(shè)、定制網(wǎng)站、動態(tài)網(wǎng)站、網(wǎng)頁設(shè)計公司、電子商務(wù)
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)