【文章內(nèi)容簡介】 格。 MSComm控件串口通訊作為一種古老而又靈活的通訊方式，被廣泛地應(yīng)用于PC機間的通訊以及PC機和單片機之間的通訊之中。提到串口通訊的編程，人們往往立刻想到C、匯編等對系統(tǒng)底層操作支持較好的編程語言以及大串繁瑣的代碼。實際上，只要我們借助相關(guān)ActiveX控件的幫助，即使是在底層操作一向不被人看好的VB中，一樣能夠?qū)崿F(xiàn)串口通訊，甚至其實現(xiàn)方法和C、匯編相比，要更加快捷方便。在VisualBasic中有一個名為MicrosoftCommunicationControl（簡稱MSComm）的通訊控件。我們只要通過對此控件的屬性和事件進行相應(yīng)編程操作，就可以輕松地實現(xiàn)串口通訊。 MSComm控件的主要屬性、事件一、MSComm的屬性由于MSComm控件屬性很多，在此僅介紹與實現(xiàn)串口通訊密切相關(guān)的核心屬性。Commport：設(shè)置通訊所占用的串口號。如設(shè)成1（默認值），表示對Com1進行操作。Setting：對串口通訊的相關(guān)參數(shù)。包括串口通訊的比特率，奇偶校驗，數(shù)據(jù)位長度、停止位等。其默認值是“9600,N,8,1”，表示串口比特率是9600bit/s，不作奇偶校驗，8位數(shù)據(jù)位，1個停止位。Portopen：設(shè)置串口狀態(tài)，值為True時打開串口，值為False時關(guān)閉串口。Input：從輸入寄存器讀取數(shù)據(jù)，返回值為從串口讀取的數(shù)據(jù)內(nèi)容，同時輸入寄存器將被清空。Ouput：發(fā)送數(shù)據(jù)到輸出寄存器。InBufferCount：設(shè)置輸入寄存器所存儲的字符數(shù)，當將其值設(shè)為0時，則輸入寄存器將被清空。InputMode：設(shè)置從輸入寄存器中讀取數(shù)據(jù)的形式。若值為0，則表示以文本形式讀取；值為1，則表示以二進制形式讀取。OutBufferCount：設(shè)置輸出寄存器所存儲的字符數(shù)，當將其值設(shè)為0時，則輸出寄存器將被清空。RThreshold：設(shè)置在MSComm控件設(shè)置CommEvent屬性為EvReceive并產(chǎn)生OnComm事件之前要接受的字符數(shù)。CommEvent屬性：返回最近的通訊事件或錯誤。通過對它具體屬性值的查詢，我們就可以獲得通訊事件和通訊錯誤的完整信息。當其值是EvReceive時表示接收到數(shù)據(jù)。二、MSComm的事件除了公共事件之外，MSComm只有一個OnComm事件。當CommEvent屬性值變化時將發(fā)生OnComm事件，指示發(fā)生一個通訊事件或錯誤。當我們設(shè)置Rtheshold屬性值為0時，將使得捕獲EvReceive事件無效。 VB程序設(shè)計 程序詳細設(shè)計VB程序詳細設(shè)計請見附錄1。 系統(tǒng)界面系統(tǒng)界面如圖53所示圖53 PC機接收數(shù)據(jù)軟件界面 VB程序設(shè)計中遇到的問題與解決方法在系統(tǒng)設(shè)計中出現(xiàn)了無法接收、接收亂碼、接收數(shù)據(jù)不完整等現(xiàn)像。經(jīng)過排查和重新設(shè)置接收模式、接收方式、處理方法等實現(xiàn)了正確接收。結(jié) 論通信技術(shù)目前在很多測控系統(tǒng)中廣泛被使用，而且遠距離的通信使用的更為突出，本系統(tǒng)的RS 232C只是用于近距離的通信，在改進的系統(tǒng)中使用RS 485可以擴大傳輸距離，并是系統(tǒng)穩(wěn)定性增強。對于給出的簡單接口電路具有成本低和占用印制版面積小的優(yōu)點。通過實驗測定的元件取值具有廣泛的適用性。上述電路在實驗中開發(fā)的手持式通用秒表器中得到應(yīng)用。實際應(yīng)用中與各種品牌多臺PC的通信皆正確，從而證明了本設(shè)計的可靠性。而針對集散控制系統(tǒng)的廣泛應(yīng)用，提出了一種新的由一臺PC機和多臺單片機組成的一個小型集散控制系統(tǒng)的結(jié)構(gòu)，實現(xiàn)了PC機與多臺單片機間的通信任務(wù)。本人論述本文創(chuàng)新點針對:既充分利用PC機豐富的軟硬件資源實現(xiàn)友好的人機界面，又通過RS232C/485總線結(jié)構(gòu)與8251/89C51單片機進行通信，對一臺或多臺單片機進行數(shù)據(jù)采集和處理。在實踐中證明資源的實用性，從而說明單片機技術(shù)和PC機技術(shù)在現(xiàn)實生活中都起著不可取代的作用，而結(jié)合這兩種技術(shù)的應(yīng)用有著極大的發(fā)展前景。單片機和PC機串行通信技術(shù)有著其特有的魅力，現(xiàn)已經(jīng)在工業(yè)、農(nóng)業(yè)、科研等各個領(lǐng)域廣泛地應(yīng)用。它憑著成本低、實現(xiàn)簡單等特點，在單片機與PC機的通信中占著一席之地。致 謝本論文是在我的導(dǎo)師高玉芹老師的親切關(guān)懷和悉心指導(dǎo)下完成的。她嚴肅的科學(xué)態(tài)度，嚴謹?shù)闹螌W(xué)精神，精益求精的工作作風，深深地感染和激勵著我。從課題的選擇到項目的最終完成，高老師老師多次詢問研究進程，并為我指點迷津，幫助我開拓研究思路，精心點撥、熱忱鼓勵，始終給予我細心的指導(dǎo)和不懈的支持。這么久以來，高老師不僅在學(xué)業(yè)上給我以精心指導(dǎo)，同時還在思想、生活上給我以無微不至的關(guān)懷，在此謹向高老師致以誠摯的謝意和崇高的敬意。對高老師的感激之情是無法用言語表達的。 同時感謝徐州工程學(xué)院院長、信電工程系主任、書記、老師們等為我提供了良好的學(xué)習和研究條件，謹向各位同仁表示誠摯的敬意和謝忱。在此，我還要感謝在一起愉快的度過大學(xué)生活的各位同學(xué)、朋友，正是由于你們的幫助和支持，我才能克服一個一個的困難和疑惑，直至本文的順利完成。特別感謝我的兄弟姐妹們，因為他們（她們）對本課題做了不少工作，給予我不少的幫助。在論文即將完成之際，我的心情無法平靜，從開始進入課題到論文的順利完成，有多少可敬的師長、同學(xué)、朋友給了我無言的幫助，在這里請接受我誠摯的謝意!感謝我的父母，焉得諼草，言樹之背，養(yǎng)育之恩，無以回報，你們永遠健康快樂是我最大的心愿。最后我還要感謝你們培養(yǎng)我長大，謝謝你們對我的理解與支持！參考文獻[1] [J].大連:大連理工大學(xué)出版社，[2] 楊毓， [M].成都:電子科技大學(xué)出版社，2001.[3] C++串口通信技術(shù)與工程實踐[M].北京：人民郵電出版社，2002 [4] 徐維祥、[M].大連：大連理工大學(xué)出版社，.[5] [M].北京：北京航天航空大學(xué)出版社,[6] [M].北京:北京航空航天大學(xué)出版社，1999[7] [M].哈爾濱：哈爾濱工業(yè)大學(xué)出版社，[8] 王建校、[M].北京：科學(xué)出版社，2002.[9] [M].北京：北京航空航天大學(xué)出版社，[10] 魯紹坤，[J].電子計算機，2002，（4）：5861[11] Databook[J]. [12] Databook[J]. 附錄附錄1硬件原理圖 附錄2/*Header file for generic 80C52 and 80C32 microcontroller.Copyright (c) 19882002 Keil Elektronik GmbH and Keil Software, Inc.All rights reserved.*/ifndef __REG52_H__define __REG52_H__/* BYTE Registers */sfr P0 = 0x80。sfr P1 = 0x90。sfr P2 = 0xA0。sfr P3 = 0xB0。sfr PSW = 0xD0。sfr ACC = 0xE0。sfr B = 0xF0。sfr SP = 0x81。sfr DPL = 0x82。sfr DPH = 0x83。sfr PCON = 0x87。sfr TCON = 0x88。sfr TMOD = 0x89。sfr TL0 = 0x8A。sfr TL1 = 0x8B。sfr TH0 = 0x8C。sfr TH1 = 0x8D。sfr IE = 0xA8。sfr IP = 0xB8。sfr SCON = 0x98。sfr SBUF = 0x99。/* 8052 Extensions */sfr T2CON = 0xC8。sfr RCAP2L = 0xCA。sfr RCAP2H = 0xCB。sfr TL2 = 0xCC。sfr TH2 = 0xCD。/* BIT Registers *//* PSW */sbit CY = PSW^7。sbit AC = PSW^6。sbit F0 = PSW^5。sbit RS1 = PSW^4。sbit RS0 = PSW^3。sbit OV = PSW^2。sbit P = PSW^0。 //8052 only/* TCON */sbit TF1 = TCON^7。sbit TR1 = TCON^6。sbit TF0 = TCON^5。sbit TR0 = TCON^4。sbit IE1 = TCON^3。sbit IT1 = TCON^2。sbit IE0 = TCON^1。sbit IT0 = TCON^0。/* IE */sbit EA = IE^7。sbit ET2 = IE^5。 //8052 onlysbit ES = IE^4。sbit ET1 = IE^3。sbit EX1 = IE^2。sbit ET0 = IE^1。sbit EX0 = IE^0。/* IP */sbit PT2 = IP^5。sbit PS = IP^4。sbit PT1 = IP^3。sbit PX1 = IP^2。sbit PT0 = IP^1。sbit PX0 = IP^0。/* P3 */sbit RD = P3^7。sbit WR = P3^6。sbit T1 = P3^5。sbit T0 = P3^4。sbit INT1 = P3^3。sbit INT0 = P3^2。sbit TXD = P3^1。sbit RXD = P3^0。/* SCON */sbit SM0 = SCON^7。sbit SM1 = SCON^6。sbit SM2 = SCON^5。sbit REN = SCON^4。sbit TB8 = SCON^3。sbit RB8 = SCON^2。sbit TI = SCON^1。sbit RI = SCON^0。/* P1 */sbit T2EX = P1^1。 // 8052 onlysbit T2 = P1^0。 // 8052 only /* T2CON */sbit TF2 = T2CON^7。sbit EXF2 = T2CON^6。sbit RCLK = T2CON^5。sbit TCLK = T2CON^4。sbit EXEN2 = T2CON^3。sbit TR2 = T2CON^2。sbit C_T2 = T2CON^1。sbit CP_RL2 = T2CON^0。endifinclude sbit P1_0=P1^0。sbit P1_1=P1^1。void main(void){ unsigned int i,j。 P1_0=0。 P1_1=0。while(1){ for(i=0。i200。i++) for(j=0。j50。j++)。 P1_0=!P1_0。 P1_1=!P1_1。 }}include include void main(){ unsigned char i,k,m。 unsigned int j。 SCON=0X52。 TMOD=0X20。 TH1=0XF3。 TL1=0XF3。 PCON=0X80。 TR1=1。 while(!RI)。 i=SBUF。 if(i==1) P1=0Xfe 。 else P1=0xfd。 for (j=0。j1000。j++) for (k=0。k100。k++)。 i=0X41。 m=0。 while(m58) { SBUF=i。 P1=0xff。 i++。 m++。 for (j=0。j5000。j++)。 P1=0X00。 while(!TI)。 for (j=0。j5000。j++)。 }}PC機串行通信及數(shù)據(jù)處理顯示程序設(shè)計源代碼： Dim conn As New Dim rs As New Private Sub insert() = Provider=。Data Source=。Persist Security Info=False Di