用VB進行串口通信設計.

1、1前言 在工業(yè)控制領(lǐng)域,我們經(jīng)常需要進行計算機與其他設備之間的通信，而串行通 信作為一種靈活、方便、可靠的通信方式被廣泛采用。在開發(fā)串行通信程序的過 程中，利用微軟的MSComm通信控件則相對較簡單，該控件具有豐富的與 串行通信 密切相關(guān)的屬性及事件，提供了對串口的各種操作。MSComm控件在串口編程時 非常方便，程序員不必花時間去了解較為復雜的 API函數(shù),而且在VB中容易使用。 2用visual basic 6.0進行串行通信程序設計的方法 (1用visual basic 6.0進行串行通信程序的設計有兩種方式，一是直接調(diào)用 Win dows API,另一種方式是使用通信組件，但后一種方式

2、實際上是通過通信組件間 接的調(diào)用了 Windows API函數(shù),其過程要比直接調(diào)用 API要復雜,但是在程序的實 現(xiàn)上要比前一種方式簡單的多。在操作系統(tǒng)方面,Windows使用通信驅(qū)動程序 Comm.drv,以便于應用程序能夠使用標準的 Windows API函數(shù)來傳遞和接收數(shù)據(jù)。 串行外圍設備的制造商則提供硬件驅(qū)動程序，以便讓其硬件能與Windows連接。 使用MSComm控件時，實際上就是使用了 API函數(shù)，API函數(shù)將被Comm.drv解釋 并傳送給外圍設備驅(qū)動程序，使用MSComm的用戶只需要關(guān)心如何使用 MSComm 所提供的屬性或事件，以驅(qū)動API函數(shù)的接口完成工作。 串行通信程序

3、的執(zhí)行過程 (2 MSComm提供了兩種處理通信問題的方法，一是事件驅(qū)動方法，一是查詢 事件驅(qū)動法 串行通信程序的執(zhí)行過程d 在使用事件驅(qū)動法設計程序時，每當有新字符到達或端口狀態(tài)改變，或發(fā)生錯 誤時,MSComm控件將觸發(fā)On Comm事件,而應用程序在捕獲該事件后,通過檢查 MSComm控件的CommEvent屬性可以獲知所發(fā)生的事件或錯誤,從而采取相應的 操作。這種方法的優(yōu)點是程序響應及時，可靠性高。 查詢法 查詢法適合于較小的應用程序，在這種情況下，每當應用程序執(zhí)行完某一串 行 口操作后,將不斷檢查MSComm控件的CommEvent屬性，以檢查執(zhí)行結(jié)果或檢查 某一事件是否發(fā)生。 (3

4、串行通信的兩種格式 進行串行通信時有兩種傳輸方式： 字符形式：通常以小于ASCII碼128的字符碼來傳遞，通常用于傳送指 令 二進制形式：將數(shù)據(jù)以二進制編碼的方式傳遞,它可能含有ASCII碼128以上 的字符碼，通常用來傳送數(shù)據(jù)，以提高速度。 3串行通信實例 下面給出在 Win2000下利用VB6.0的MSComm控件開發(fā)計算機與一智 能采 集模塊進行串行通信的程序?qū)崿F(xiàn)。在工控領(lǐng)域內(nèi)，智能采集模塊有著相當重 要的地 位，它可以通過串口通訊協(xié)議(RS232、RS485等或其他通訊協(xié)議與PC機相連，并與 外界現(xiàn)場信號直接相連或與由傳感器轉(zhuǎn)換過的外界信號相連，由PC機中的程序控 制并實現(xiàn)采集現(xiàn)場的模

5、擬信號，并處理采集到的現(xiàn)場信號并輸出模擬控制信號、開 關(guān)量輸入輸出等功能。因此，智能采集模塊在工業(yè)控制領(lǐng) 域內(nèi)有著極其廣泛的應 用。本例子中的智能采集模塊與計算機進行通信時，采用一位開始位、一位停止 位、7位數(shù)據(jù)位、偶校驗方式，波特率為9600bps. (1在窗體中添加名為 MyComm的MSComm控件,并設置空間的屬性,如下： .CommPort=2 使用 COM2 .Setting=9600,e,7,1波特率9600偶校驗,7個數(shù)據(jù)位,1個停止 位.InBufferSize=40 設置MyComm接收緩沖區(qū)為40個字節(jié) .OutBufferSize=2 設置MyComm發(fā)送緩沖區(qū)為2個字

6、節(jié) n putMode=coml nputModeBi nary 設置接收數(shù)據(jù)模式為二進制模式 .In putLe n=1 設置一次從接收緩沖區(qū)讀取字節(jié)數(shù)為 1 .Sthreshold=1設置一次從發(fā)送緩沖區(qū)讀取字節(jié)數(shù)為1 .PortOpe n=True 打開通信口 其他屬性設置省略 (2下面是響應Mycomm_OnComm事件的處理程序,對數(shù)據(jù)庫采集的處理程序 采用MSComm事件驅(qū)動方式。 Private Sub MyCom m_On Comm( With MyComm Select case .CommEve nt Case .comEvReceive 接收數(shù)據(jù) 對數(shù)據(jù)進行處理 case .comEVSe nd 發(fā)送數(shù)據(jù) case .