日韩无码专区无码一级三级片|91人人爱网站中日韩无码电影|厨房大战丰满熟妇|AV高清无码在线免费观看|另类AV日韩少妇熟女|中文日本大黄一级黄色片|色情在线视频免费|亚洲成人特黄a片|黄片wwwav色图欧美|欧亚乱色一区二区三区

RELATEED CONSULTING
相關(guān)咨詢
選擇下列產(chǎn)品馬上在線溝通
服務(wù)時(shí)間：8:30-17:00
你可能遇到了下面的問題
關(guān)閉右側(cè)工具欄

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營銷解決方案
三步了解VB.NET串口通訊如何發(fā)送接收數(shù)據(jù)

學(xué)習(xí)VB.NET時(shí)，你可能會遇到VB.NET串口通訊問題，這里將介紹VB.NET串口通訊問題的解決方法，在這里拿出來和大家分享一下。VB.NET串口通訊支持總是讓人覺得有所不足，在使用VB6的MsComm32.ocx時(shí)，很多人都會在VB.NET的開發(fā)中覺得很困擾。這里講述的VB.NET串口通訊類使用native代碼，并且它是通API調(diào)用實(shí)現(xiàn)的，你會發(fā)現(xiàn)VB.NET串口通訊就是這么簡單。

成都創(chuàng)新互聯(lián)憑借在網(wǎng)站建設(shè)、網(wǎng)站推廣領(lǐng)域領(lǐng)先的技術(shù)能力和多年的行業(yè)經(jīng)驗(yàn)，為客戶提供超值的營銷型網(wǎng)站建設(shè)服務(wù)，我們始終認(rèn)為：好的營銷型網(wǎng)站就是好的業(yè)務(wù)員。我們已成功為企業(yè)單位、個(gè)人等客戶提供了網(wǎng)站設(shè)計(jì)制作、做網(wǎng)站服務(wù)，以良好的商業(yè)信譽(yù)，完善的服務(wù)及深厚的技術(shù)力量處于同行領(lǐng)先地位。

在說明如何使用這個(gè)類前，需要說明的是，本類只是一個(gè)VB.NET串口通訊演示，你可能需要根據(jù)你的情況修改后使用。另外，本類的目的是通過例子教會你在無需ocx控件和第三方組件的支持下用VB.NET開發(fā)串口通訊程序，所有并沒有完善的異常錯(cuò)誤處理。

1.初始化并打開串口

創(chuàng)建一個(gè)CRs232類的實(shí)例，并在調(diào)用Open方法前設(shè)置好串口通訊參數(shù)。

 
 
 
    
  
  
  
  1. Dim moRS232 as New Rs232() 
    2. 
  
  
  
  2. With moRs232 
    3. 
  
  
  
  3. .Port = 1'//Uses COM1 
    4. 
  
  
  
  4. .BaudRate = 2400
    5. 
  
  
  
  5. '//波特率 2400 
    6. 
  
  
  
  6. .DataBit = 8  
    7. 
  
  
  
  7. '//8 data bits 
    8. 
  
  
  
  8. .StopBit = Rs232.DataStopBit.StopBit_1 
    9. 
  
  
  
  9. '//停止位 1 
    10. 
  
  
  
  10. .Parity = Rs232.DataParity.Parity_None 
    11. 
  
  
  
  11. '//無奇偶校驗(yàn) 
    12. 
  
  
  
  12. .Timeout = 500  
    13. 
  
  
  
  13. '//超時(shí)時(shí)間500 ms 
    14. 
  
  
  
  14. End With 
    15. 
  
  
  
  15. 
  
  
  
  16. '// 初始化并打開串口 
    17. 
  
  
  
  17. moRS232.Open () 
    18. 
  
  
  
  18. '// 串口打開后，你可以隨意地控制DTR/RTS 
    19. 
  
  
  
  19. moRS232.Dtr = True
    20. 
  
  
  
  20. moRS232.Rts = True
    21.

2.發(fā)送數(shù)據(jù)

本類為Rx和Tx準(zhǔn)備了兩個(gè)緩沖區(qū)(buffer)，發(fā)送數(shù)據(jù)時(shí)，只需要設(shè)置TxData屬性為你需要發(fā)送的數(shù)據(jù)，然后調(diào)用Tx方法就可以了。

 
 
 
    
  
  
  
  1. moRS232.TxData = txtTx.Text 
    2. 
  
  
  
  2. moRS232.Tx()
    3.

3.接收數(shù)據(jù)

先調(diào)用Rx方法（參數(shù)為您需要從串口讀取的字節(jié)數(shù)），然后讀取RxData屬性。

 
 
 
    
  
  
  
  1. moRS232.Rx(10) 
    2. 
  
  
  
  2. '// 從串口通訊緩沖區(qū)里讀取10字節(jié) 
    3. 
  
  
  
  3. Dim sRead as String=moRs232.RxData
    4.

需要注意的是，當(dāng)本類無法用串口讀取到所需的字節(jié)數(shù)，程序線程在超時(shí)異常發(fā)生前是鎖死的，超時(shí)時(shí)間通過Timout屬性設(shè)置。


當(dāng)前名稱：三步了解VB.NET串口通訊如何發(fā)送接收數(shù)據(jù)
網(wǎng)頁地址：http://www.5511xx.com/article/cdpjgdh.html