基于VB 6.0串口通信的氣壓測高系統數據采集

　　3 VB 6.0中MSComm通信控件

　　VB 6.0增加了面向對象程序設計功能，它不僅可以方便快捷地編制適用于數據處理、多媒體等方面的程序，并且提供了一個(gè)ActiveX控件——Microsoft Communication Control，Version 6.0，稱(chēng)為MSComm控件，可以方便地開(kāi)發(fā)出使用計算機串口的計算機通信程序。MSComm控件提供了兩種處理通信的方式：一種為事件驅動(dòng)方式，該方式相當于一般程序設計中的中斷方式。當串口發(fā)生事件或錯誤時(shí)，MSComm控件會(huì )產(chǎn)生OnComm事件，用戶(hù)程序可以捕獲該事件進(jìn)行相應處理。另一種為查詢(xún)方式，在用戶(hù)程序中設計定時(shí)或不定時(shí)查詢(xún)MSComm控件的某些屬性是否發(fā)生變化，從而確定相應處理。

　　利用MSComm控件實(shí)現計算機通信的關(guān)鍵是理解并正確設置MSComm控件眾多屬性和方法。以下是 MSComm控件的常用屬性和方法：

　　Commport：設置或返回串口號，類(lèi)型short。

　　Settings：以字符串的形式設置或返回串口通信參數。

　　Portopen：設置或返回串口狀態(tài)。

　　InputMode：設置或返回接收數據的類(lèi)型。

　　Inputlen：設置或返回一次從接收緩沖區中讀取字節數，類(lèi)型short。

　　Input：從接收緩沖區中讀取數據并清空該緩沖區，該屬性設計時(shí)無(wú)效，運行時(shí)只讀。

　　Output：向發(fā)送緩沖區發(fā)送數據，該屬性設計時(shí)無(wú)效，運行時(shí)只讀。

　　Rthreshold：當接收緩沖區中字符數達到該值時(shí)，MSComm控件設置Commevent屬性為ComEvReceive，并產(chǎn)生 OnComm事件。

　　Sthreshold：當發(fā)送緩沖區中字符數小于該值時(shí)，MSComm控件設置Commevent屬性為ComEvSend，并產(chǎn)生OnComm事件。若Sthreshold屬性設置為0，則不產(chǎn)生OnComm事件。

　　CommEvent：串口事件，該屬性設計時(shí)無(wú)效，運行時(shí)只讀。一旦串口發(fā)生通信事件或產(chǎn)生錯誤，依據產(chǎn)生的事件和錯誤，MSComm控件為 CommEvent屬性賦不同的代碼，同時(shí)產(chǎn)生OnComm事件。用戶(hù)程序就可在OnComm事件處理程序中針對不同的代碼，進(jìn)行相應的處理。

　　4 利用VB 6.0實(shí)現數據采集的串行通信

　　在VB 6.0編程環(huán)境下，新建工程并引用MSComm控件，在窗體中添加所需控件，構建一個(gè)合理的收發(fā)界面。在窗體中還需要添加以下幾個(gè)基本控件：

　　(1)MSComm控件，主要用于軟件對串口的訪(fǎng)問(wèn)。由于需要實(shí)現多臺氣壓測高接收機的測試，需要添加多個(gè)控件。

　　(2)定時(shí)器控件，用于使PC機定時(shí)向各氣壓測高接收機發(fā)送命令，使其定時(shí)回傳實(shí)時(shí)數據。

　　(3)非周期命令發(fā)送按鈕，用于非周期性指令的傳送啟動(dòng)。

　 (4)數據保存按鈕，用于將采集到數據保存為文本文件，便于數據后處理。

　　(5)用于數據接收數據和發(fā)送數據的文本框。