基于VB 6.0串口通信的氣壓測高系統(tǒng)數(shù)據(jù)采集

　　3 VB 6.0中MSComm通信控件

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

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

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

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

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

　　InputMode：設(shè)置或返回接收數(shù)據(jù)的類型。

　　Inputlen：設(shè)置或返回一次從接收緩沖區(qū)中讀取字節(jié)數(shù)，類型short。

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

　　Output：向發(fā)送緩沖區(qū)發(fā)送數(shù)據(jù)，該屬性設(shè)計時無效，運行時只讀。

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

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

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

　　4 利用VB 6.0實現(xiàn)數(shù)據(jù)采集的串行通信

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

　　(1)MSComm控件，主要用于軟件對串口的訪問。由于需要實現(xiàn)多臺氣壓測高接收機的測試，需要添加多個控件。

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

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

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

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