VisualBasic中通訊控制項及其在windows平台下的通訊軟體設計方法，並結合具體實例給出了基本的通訊程序。
1992年crescentsoftwareinc.公司專為vb設計了mscomm.vbx用戶通信控件，它提供了透過串口發送和接收數據的串行通信能力，不僅包括了全部windowsapi中關於串行通信的16個函數所完成的功能，而且開拓了更多的使用戶設計方便的物件屬性來滿足不同用戶不同業務的需求。目前國內眾多的vb資料中很少涉及此通訊控制項的介紹，本文將詳細介紹mscomm.vbx通訊控制項及程式設計方法，並結合工作中的一個實例給出基本通訊程式。
1mscomm.vbx通訊控制項描述
mscomm.vbx通訊控制項可直接從vb的toolbox加入窗體form，即可用其進行通訊。若toolbox中無此控件，則用tools的customcontrols將mscomm.vbx從windows的system子目錄中加入vb的toolbox中。
1.1通信方式
mscomm.vbx有2種不同的方式來處理和解決各類通訊軟體的開發和設計問題
1、事件驅動。它與c/c 寫入windows軟體時的視窗回調函數類似，是1種功能強大的處理問題的方法。在實際工作中，往往要處理許多通訊中的相關事件，例如：當線路資料到達本端或cd線和rts訊號線狀態發生變化時，要求我們使用相應的事件來追蹤和處理，該控制項是使用oncomm事件來實現的，它也包括檢測和處理通訊錯誤等方面的問題，commevent值會傳回最近的通訊事件或錯誤的數字代碼。通訊控制項詳細的錯誤和事件舉例有：
mscomm-er-break收到1個breaksignal
mscomm-er-cdtocd訊號超時
……
mscomm-ev-cdcd訊號改變
……
2、查詢方式。由程式設計者負責讀取commevent的值並處理所發生的錯誤或事件。通常簡單的應用程式設計可採用這種方法。
1.2通訊控件的屬性
利用通訊控制編制通訊程序，關鍵在於準確理解設定通訊控制項的屬性。 mscomm.vbx提供了27個關於通訊控制項方面的屬性，例如：
commport：設定或返回通信口編號。
settings：設定或傳回以字串形式出現的資料通訊格式：波特率、校驗、資料位元和停止位元。
portopen：設定或返回通訊口狀態（包括開啟和關閉1個通訊口）
……
3、實例
本程式應用背景為dcc95型靜電集塵器自動監控系統軟體，解決1個pc工控機（主站）與32個單晶片（子站）之間的通訊問題。主站與子站之間這總線式網路結構，採用rs-485通訊標準，以問答方式進行資料通訊。由於32個子站與主站發送通訊命令（下行命令），主站在接收子站發回的相應回答命令（上行命令）後繼續發送下行命令的通信形式。根據系統功能的要求，主站需發送2種類型的命令：（1）同期命令，它由定時器觸發引起，每隔ls週期發送1次；（2）非週期性命令，它由操作者按動相應命令按鈕引起，非週期性發送。自動監控系統軟體安裝在主站上，而通訊程式作為自動監控系統軟體的一部分也安裝在主站上。
本文僅列出調試通訊程序時進行試驗用的基本演示程序清單。試驗時，用1台pc機作為主站，另一台pc機模擬32個子站的工作，兩台pc機之間採用rs232c串列通訊。往主站的通訊示範程式窗體（form）中加入1個通訊控件、2個定時器控件和1個指令按鈕控件，通訊控制項（mscomm1）用於存取串列埠，傳送和接收資料；periodic定時器控件（periodic）用於控制每秒由主站向各子站發送週期性命令；命令按鈕控制(nonperiodic-command)與nonperiodic定時器控制項（nonperiodic）用於發送非週期性命令。資料傳送採用事件驅動的通訊方式，根據不同的發送命令設定rtreshlod屬性，從而引起oncomm事件以接收資料。
2.1窗體各控制初始化程序
設定通訊串口工作參數，設定periodic定時器的在中斷間隔為ls,nonperiodic定時器的中斷間隔為0.5s。
subform-load()
mscomm1.commport=2'選用com2串列口
mscomm1.settings="9600，n8，1"'波特率9600，無奇偶校驗位，8位資料位1位停止位
mscomm1.inputlen=0'input將讀取接收緩衝區的全部內容
mscomm1.inbuffersize=1024'設定接收緩衝區的位元組長度
mscomm1.portopen=true'開啟通訊口
mscomm1.inbuffercount=0'清除發送緩衝區數據
mscomm1.outbuffercount=0'清除接收緩衝區數據
periodic.inteval=100'設定ls定時間隔，使遙測指令每隔ls發送1次
nonperiodic.inteval=500'設定0.5s定時間隔，查詢指令按鈕是否處於啟動狀態以決定是否發送週期性指令
command-PRessed=false'指令按鈕為未啟動狀態
during-periodic=false'週期性命令資料傳輸尚未開始
during-nonperiodic=false'非週期性命令資料傳輸尚未開始
endsub
2.2非週期性命令發送程序
依據指令按鈕狀態及週期性指令資料傳輸狀態，在nonperiodic定時器的中斷程序中傳送非週期性指令。
subnonperiodic-command-click()
command-pressed=true'命令按鈕已激活
endsub
subnonperiodic-timer()
ifduring-periodic=trueorcommand-pressed=false
thenexitsub'若週期性命令資料傳輸尚未結束或命令按鈕處於啟動狀態，則退出發送非週期性命令程式。
command-pressed=false'指令按鈕恢復為未啟動狀態
callsenddata(nonperiodic-command)'發送非週期性指令
mscomm1.rthreshold=r-nonperiodic-byte'發送非週期性指令後，設定rthreshold屬性，使主站接收所設定的位元組數後引發oncomm事件
endsub
2.3periodic定時器程序
在periodic定時器的中斷程序中發送週期性命令：
subperiodic-timer()
ifduring-nonperiodic=truethenexitsub'若非週期性命令資料傳輸尚未結束，則退出發送非週期性命令程式。
during-periodic=true'設定週期性指令資料傳輸狀態為正在進行中
callsenddata(periodic-command)'發送週期性命令
mscomm1.rthreshold=r-periodic-byte'發送週期性指令後，主站接收r-remot-edata-byte個位元組，可引發oncomm事件
endsub
2.4oncomm事件程序
根據rthreshold屬性設定值，當接收快取區內接收到對應位元組的字元時，引發oncomm事件，在中斷程序中接收資料。
submscomm1-oncomm()
selectcasemscomm1.commevent'此處可插入處理各種不同錯誤或事件的程式碼
casemscomm-ev-receive
receivestring$=mscomm1.input
selectcasemscomm1.rthreshold
caser-periodic-byte'週期性指令的應答數據
calldisposedata(periodic-command)'處理接收數據
duringperiodic=false'設定週期性指令資料傳輸狀態為結束
caser-nonperiodic-byte'非週期性指令的應答數據
calldisposedata(nonperiodic-command)'處理接收數據
during-nonperiodic=false'設定非週期性指令資料傳輸狀態為結束
endselect
endselect
endsub
隨著vb版本的不斷升級，vb將成為最快速、易於使用、強勁的應用開發工具，是企業級客戶/伺服器應用軟體開發的首選工具之一。 ->