串口通信實驗報告

1、vb串口通信實驗1實驗要求：設計一個串口通信程序，用于信息的接收和發(fā)送2實驗目的：2.1熟悉并掌握串口標準及原理；2.2實現pc機與pc機之間通過串口進行數據的收發(fā)；3.3熟悉vb語言編寫程序的環(huán)境，用vb開發(fā)串口通信程序3實驗步驟：3.1運行vb程序，出現“新建工程”對話框，選擇“標準exe”，單擊“打開”命令按鈕，進入vb工程集成開發(fā)環(huán)境；3.2 添加串口通信控件mscomm到工具箱中；3.3界面設計（1）添加兩個文本框控件：text1 和text2，用于輸入要發(fā)送的字符和顯示要接收的字符；（2）添加兩個標簽控件：label1和label2，作為發(fā)送和接收字符區(qū)的標簽；（3）添加一個按鈕控

2、件：command1執(zhí)行發(fā)送字符命令；（4）添加一個mscomm控件。3.4屬性設置窗體控件控 件 類 型主 要 屬 性功 能form(名稱) = comform窗體控件borderstyle = 3運行時窗體固定大小caption = pc與pc串口通信窗體標題欄顯示程序名稱標簽控件1label(名稱) = label1標簽控件caption = 顯示接收字符區(qū)：標簽文本標簽控件2label(名稱) = label2標簽控件caption = 輸入發(fā)送字符區(qū)：標簽文本文本框控件1textbox(名稱) = textsend文本框控件multiline = true允許多行顯示scrollba

3、rs = 2-vertical垂直滾動條可用文本框控件2textbox(名稱) = textreceive文本框控件multiline = true允許多行顯示scrollbars = 2-vertical垂直滾動條可用按鈕控件commandbutton(名稱) = cmdsend按鈕控件caption = 發(fā)送字符 手動發(fā)送字符串口通信控件mscomm(名稱) = mscomm1串口通信控件其他屬性在程序中設置3.5程序代碼設計private sub form_load() mscomm1.commport = 1 mscomm1.settings = 9600,n,8,1 mscomm1.

4、inputmode = 0 mscomm1.rthreshold = 1 mscomm1.portopen = true end subprivate sub cmdsend_click() if textsend.text = then pp = msgbox(發(fā)送的數據不能為空！, 16) exit sub end if mscomm1.output = trim(textsend.text)end subprivate sub mscomm1_oncomm() dim buf$ select case mscomm1.commevent case comevcd case comevct

5、s case comevdsr case comevreceive buf = trim(mscomm1.input) case comevsend end select textreceive.text = textreceive.text & bufend subprivate sub cmdquit_click() unload meend subprivate sub form_unload(cancel as integer) mscomm1.portopen = falseend sub3.5程序運行截圖圖1 主界面圖2 發(fā)送信息圖3 接收信息4.實驗總結本次實驗是利用vb實現計算機與計算機之間的串口通信