• 下載demo - 9.49 KB
• 下載source - 3.9 KB

介紹 在我的硬體專案中，有好幾次，我不得不通過串列埠(RS-232)在微控制器(Microchip PIC)和PC之間傳送一些校準資料。PC端的軟體是用VB6編寫的，帶有MSComm控制元件。後者必須配置引數:埠號、波特率、資料位數、停止位數。配置MSComm是一項相當常見的任務(在過去甚至更常見)。所以，一開始我認為應該在網上有一個對話方塊。不幸的是，這樣的對話沒有找到，我自己寫了一個。希望它是通用的和可重用的。 特性 串列埠的自動檢測最新的埠設定被儲存在INI檔案介面中，支援在同一個程式中配置多個埠 對話方塊 配置在frmComm對話方塊中完成。 ShowConfig 宣言 隱藏,複製Code

Public Function ShowConfig( _ 
    ByRef comm As MSComm, _ 
    Optional ByRef strIniFile As String, _ 
    Optional ByRef strSection As String) _ 
    As VbMsgBoxResult 

目的 設定配置對話方塊並將其顯示給使用者。cboPort與可用COM埠列表進行互動。 引數 隱藏,複製CodeByRef comm作為MSComm 將在對話方塊中配置。如果已經打開了comm，則GUI預裝了它的配置並關閉了comm。 隱藏,複製可選的ByRef strIniFile作為字串 包含配置資訊的INI檔案的可選名稱。GUI預裝了INI檔案中的設定。 隱藏,複製可選的ByRef strSection作為字串 INI檔案中包含配置資訊的部分的可選名稱。如果沒有提供區段名稱，則使用預設名稱serial_port。 返回值 當配置成功時vbOK取消使用者決定取消配置 QuietConfig 宣言 隱藏,複製Code

Public Function QuietConfig( _ 
    ByRef comm As MSComm, _ 
    ByRef strIniFile As String, _ 
    ByRef strSection As String) _ 
    As VbMsgBoxResult 

目的 使用本地檔案中的引數配置目標MSComm，而不顯示配置對話方塊。 先決條件 提供的INI檔案包含配置資訊。 後置條件 目標MSComm已配置，但未開啟。 引數 隱藏,複製CodeByRef comm作為MSComm MSComm將從INI檔案中配置。如果通訊中心已經開放，就會關閉。 隱藏,複製CodeByRef strIniFile為字串 包含配置資訊的INI檔案的可選名稱。GUI預裝了INI檔案中的設定。 隱藏,複製CodeByRef strSection作為字串 INI檔案中包含配置資訊的部分的可選名稱。如果沒有提供區段名稱，則使用預設名稱serial_port。 返回值 配置成功時vbOK，如果INI檔案錯誤或不存在vbAbort INI檔案 載入和儲存 如果提供了檔案的名稱，則使用INI檔案中的引數填充對話方塊。 結構 多個部分用於同一INI檔案中的多個埠，或單個INI檔案用於多個埠。INI檔案部分的名稱可以由使用者選擇，預設名稱是serial_port。 關鍵字:CommPort -埠號，如MSComm.CommPort 埠設定與MSComm.Settings中的格式相同 閉幕詞 請讓我知道如果你發現任何錯誤或有任何建議! 參考文獻 超終端的[1]串列埠配置對話方塊 用於MSComm控制的[2]根MSDN文章http://msdn2.microsoft.com/en-us/library/aa259393.aspx 修訂歷史 2007年6月18日，在專案檔案中增加了缺失的frmComm.frx 本文轉載於：http://www.diyabc.com/frontweb/news2401.html