【正文】 35設(shè)置并返回的要接收的字符數(shù)。語法: [ = value ]（value 整型表達式，說明在產(chǎn)生OnComm 事件之前要接收的字符數(shù)。 ）說明:當接收字符后，若 Rthreshold 屬性設(shè)置為 0（缺省值）則不產(chǎn)生 OnComm 事件。例如，設(shè)置 Rthreshold 為 1，接收緩沖區(qū)收到每一個字符都會使 MSComm 控件產(chǎn)生 OnComm 事件。3. CTSHolding 屬性：確定是否可通過查詢 Clear To Send (CTS) 線的狀態(tài)發(fā)送數(shù)據(jù)。 Clear To Send 是調(diào)制解調(diào)器發(fā)送到相聯(lián)計算機的信號，指示傳輸可以進行。該屬性在設(shè)計時無效，在運行時為只讀。語法:（Boolean）Msm 控件的 CTSHolding 屬性設(shè)置值：True Clear To Send 線為高電平。 False Clear To Send 線為低電平。 說明:如果 Clear To Send 線為低電平 (CTSHolding = False) 并且超時時，MSComm 控件設(shè)置 CommEvent 屬性為 EventCTSTO (Clear To Send Timeout) 并產(chǎn)生 OnComm 事件；Clear To Send 線用于 RTS/CTS (Request To Send/Clear To Send) 硬件握手。如果需要確定 Clear To Send 線的狀態(tài)，CTSHolding 屬性給出一種手工查詢的方法。詳細信息:有關(guān)握手協(xié)議，請參閱 Handshaking 屬性。4．SThreshold 屬性：MSComm 控件設(shè)置 CommEvent 屬性為 EvSend 并產(chǎn)生 OnComm 事件之前，設(shè)置并返回傳輸緩沖區(qū)中允許的最小字符數(shù)。語法: [ = value ]value 整形表達式，代表在 OnComm 事件產(chǎn)生之前在傳輸緩沖區(qū)中的最小字符數(shù)。 說明:若設(shè)置 Sthreshold 屬性為 0（缺省值） ，數(shù)據(jù)傳輸事件不會產(chǎn)生 OnComm 事件。若設(shè)置 Sthreshold 屬性為 1，當傳輸緩沖區(qū)完全空時，MSComm 控件產(chǎn)生 OnComm 事件。如果在傳輸緩沖區(qū)中的字符數(shù)小于 value，CommEvent 屬性設(shè)置為 EvSend，并產(chǎn)生 OnComm 事件。 EvSend 事件僅當字符數(shù)與 河北聯(lián)合大學電氣工程學院36Sthreshold 交叉時被激活一次。例如，如果 Sthreshold 等于 5，僅當在輸出隊列中字符數(shù)從 5 降到 4 時，EvSend 才發(fā)生。如果在輸出隊列中從沒有比 Sthreshold 多的字符，EvSend 事件將絕不會發(fā)生。5. CDHolding 屬性通過查詢 Carrier Detect (CD) 線的狀態(tài)確定當前是否有傳輸。Carrier Detect 是從調(diào)制解調(diào)器發(fā)送到相聯(lián)計算機的一個信號，指示調(diào)制解調(diào)器正在聯(lián)機。該屬性在設(shè)計時無效，在運行時為只讀。語法:設(shè)置值 CDHolding 屬性的設(shè)置值為： 設(shè)置 描述 True Carrier Detect 線為高電平 False Carrier Detect 線為低電平 說明:注意當 Carrier Detect 線為高電平 (CDHolding = True) 且超時時,MSComm 控件設(shè)置 CommEvent 屬性為 EventCDTO（Carrier Detect 時錯誤） ，并產(chǎn)生 OnComm 事件。注意:在主機應(yīng)用程序中捕獲一個丟失的傳輸是特別重要的，例如一個公告 板，因為呼叫者可以隨時掛起（放棄傳輸） 。Carrier Detect 也被稱為 Receive Line Signal Detect (RLSD)。數(shù)據(jù)類型:Boolean6. DSRHolding 屬性：確定 Data Set Ready (DSR) 線的狀態(tài)。Data Set Ready 信號由調(diào)制解調(diào)器發(fā)送到相連計算機，指示作好操作準備。該屬性在設(shè)計時無效，在運行時為只讀。語法: object 所在處表示對象表達式，其值是“應(yīng)用于”列表中的對象。DSRHolding 屬性返回以下值： 值 描述 True Data Set Ready 線高 False Data Set Ready 線低 說明:當 Data Set Ready 線為高電平 (DSRHolding = True) 且超時時， 第 4 章 基于 VB 的上位機的設(shè)計37MSComm 控件設(shè)置 CommEvent 屬性為 EventDSRTO（數(shù)據(jù)準備超時）并產(chǎn)生 OnComm 事件；當為 Data Terminal Equipment (DTE) 機器寫 Data Set Ready/Data Terminal Ready 握手例程時該屬性是十分有用的。數(shù)據(jù)類型:Boolean7．Settings 屬性:設(shè)置并返回波特率、奇偶校驗、數(shù)據(jù)位、停止位參數(shù)。語法：[ = value]說明：當端口打開時，如果 value 非法，則 MSComm 控件產(chǎn)生錯誤 380（非法 屬性值） 。Value 由四個設(shè)置值組成，有如下的格式：BBBB,P,D,S其中：BBBB 為波特率，P 為奇偶校驗，D 為數(shù)據(jù)位數(shù)，S 為停止位數(shù)。Value 的缺省值是：9600,N,8,1 屬性設(shè)置并返回 Input 屬性從接收緩沖區(qū)讀取的字符數(shù)。語法: [ = value]InputLen 屬性語法包括下列部分：value 整型表達式，說明 Input 屬性從接收緩沖區(qū)中讀取的字符數(shù)。 說明:InputLen 屬性的缺省值是 0。設(shè)置 InputLen 為 0 時，使用 Input 將使 MSComm 控件讀取接收緩沖區(qū)中全部的內(nèi)容。若接收緩沖區(qū)中 InputLen 字符無效，Input 屬性返回一個零長度字符串 ()。在使用 Input 前，用戶可以選擇檢查 InBufferCount 屬性來確定緩沖區(qū)中是否已有需要數(shù)目的字符。該屬性在從輸出格式為定長數(shù)據(jù)的機器讀取數(shù)據(jù)時非常有用。9. EOFEnable 屬性確定在輸入過程中 MSComm 控件是否尋找文件結(jié)尾 (EOF)字符。如果找到EOF 字符，將停止輸入并激活 OnComm 事件，此時 CommEvent 屬性設(shè)置為 EvEOF。語法： [ = value ]EOFEnable 屬性語法包括下列部分： value 布爾表達式，確定當找到 EOF 字符時，OnComm 事件是否被激活，如 “設(shè)置值”中所描述。 河北聯(lián)合大學電氣工程學院38value 的設(shè)置值： True 當 EOF 字符找到時 OnComm 事件被激活。 False（缺?。┊?EOF 字符找到時 OnComm 事件不被激活。 說明：當 EOFEnable 屬性設(shè)置為 False，OnComm 控件將不在輸入流中尋找 EOF 字符。10．Portopen 屬性設(shè)置或返回串口狀態(tài)。11．InputMode 屬性設(shè)置或返回接收數(shù)據(jù)的類型。12．Inputlen 屬性設(shè)置或返回一次從接收緩沖區(qū)中讀取字節(jié)數(shù)。13．InBufferSize 屬性設(shè)置或返回接收緩沖區(qū)的大小，缺省值為 1024 字節(jié)。14．InBufferCount 屬性設(shè)置或返回接收緩沖區(qū)中等待計算機接收的字符數(shù)。15．Input 屬性從接收緩沖區(qū)中讀取數(shù)據(jù)并清空該緩沖區(qū)，該屬性設(shè)計時無效，運行時只讀。16．OutBufferSize 屬性設(shè)置或返回發(fā)送緩沖區(qū)的大小，缺省值為 512 字節(jié)。17．OutBufferCount 屬性設(shè)置或返回發(fā)送緩沖區(qū)中等待計算機發(fā)送的字符數(shù)。18．Output 屬性向發(fā)送緩沖區(qū)發(fā)送數(shù)據(jù)，該屬性設(shè)計時無效，運行時只讀。19．Rthreshold 屬性該屬性為一閥值。當接收緩沖區(qū)中字符數(shù)達到該值時，MSComm 控件設(shè)置Commevent 屬性為 ComEvReceive，并產(chǎn)生 OnComm 事件。用戶可在 OnComm事件處理程序中進行相應(yīng)處理。若 Rthreshold 屬性設(shè)置為 0，則不產(chǎn)生OnComm 事件。例如用戶希望接收緩沖區(qū)中達到一個字符就接收一個字符，可第 4 章 基于 VB 的上位機的設(shè)計39將 Rthreshold 設(shè)置為 1。這樣接收緩沖區(qū)中接收到一個字符，就產(chǎn)生一次OnComm 事件。20．CommEvent 屬性這是一個非常重要的屬性。該屬性設(shè)計時無效，運行時只讀。一旦串口發(fā)生通信事件或產(chǎn)生錯誤，依據(jù)產(chǎn)生的事件和錯誤，MSComm 控件為CommEvent 屬性賦不同的代碼，同時產(chǎn)生 OnComm 事件。用戶程序就可在OnComm 事件處理程序中針對不同的代碼，進行相應(yīng)的處理。CommEvent 屬性的代碼、常數(shù)及含義參見表 1 及表 2。表 1 CommEvent 通信事件代碼 常數(shù) 含義1 ComEvReceive接受到 Rthreshold 個字符。該事件將持續(xù)產(chǎn)生，直到用 Input 屬性從接受緩沖區(qū)中讀取并刪除字符。2 ComEvSend發(fā)送緩沖區(qū)中數(shù)據(jù)少于 Sthreshold 個，說明串口已經(jīng)發(fā)送了一些數(shù)據(jù)，程序可以用 Output 屬性繼續(xù)發(fā)送數(shù)據(jù)。3 ComEvCTS Clear To Send 信號線狀態(tài)發(fā)生變化。4 ComEvDSR Data Set Ready 信號線狀態(tài)從 1 變到 0。5 ComEvCD Carrier Detect 信號線狀態(tài)發(fā)生變化。6 ComEvRing 檢測到振鈴信號。7 ComEvEOF 接受到文件結(jié)束符。表 2 CommEvent 通信錯誤代碼 常數(shù) 含義1001 ComEvntBreak 接受到一個中斷信號。1002 ComEvntCTSTO Clear To Send 信號超時。河北聯(lián)合大學電氣工程學院401003 ComEvntDSRTO Data Set Ready 信號超時。1004 ComEvntFrame 幀錯誤。1006 ComEvntOverrun 串口超速。1007 ComEvntCDTO 載波檢測超時。1008 ComEvntRxOver 接受緩沖區(qū)溢出，緩沖區(qū)中已沒有空間。1009 ComEvntRxParity 奇偶校驗錯。1010 ComEvntTxFull 發(fā)送緩沖區(qū)溢出，緩沖區(qū)中已沒有空間。1011 ComEvntDCB 檢索串口的設(shè)備控制塊時發(fā)生錯誤。 MSComm 控件的事件OnComm 是 MSComm 控件的唯一事件，此事件可用來處理所有與通信相關(guān)的事件，不管是何種事件發(fā)生，MSComm 控件只用一個 CommEvent 的屬性予以代表。使用事件程序的好處是不需要一直讓程序處于檢查的狀態(tài)，只要事先將程序代碼寫好，一有事件發(fā)生，就會直接執(zhí)行相應(yīng)的程序代碼。CommEvent 屬性會返回下列所述的值之一，表示不同的通信錯誤或事件。通信錯誤設(shè)置值如表所示。表 3 通信錯誤值說明代碼 常數(shù) 含義1001 ComEvntBreak 接受到一個中斷信號。1002 ComEvntCTSTO Clear To Send 信號超時。第 4 章 基于 VB 的上位機的設(shè)計411003 ComEvntDSRTO Data Set Ready 信號超時。1004 ComEvntFrame 幀錯誤。1006 ComEvntOverrun 串口超速。1007 ComEvntCDTO 載波檢測超時。1008 ComEvntRxOver 接受緩沖區(qū)溢出，緩沖區(qū)中已沒有空間。1009 ComEvntRxParity 奇偶校驗錯。1010 ComEvntTxFull 發(fā)送緩沖區(qū)溢出，緩沖區(qū)中已沒有空間。1011 ComEvntDCB 檢索串口的設(shè)備控制塊時發(fā)生錯誤。通信事件常數(shù)設(shè)置及其值則如下表所示：表 4 CommEvent 通信事件常數(shù)代碼 常數(shù) 含義1 ComEvReceive接受到 Rthreshold 個字符。該事件將持續(xù)產(chǎn)生，直到用 Input 屬性從接受緩沖區(qū)中讀取并刪除字符。2 ComEvSend發(fā)送緩沖區(qū)中數(shù)據(jù)少于 Sthreshold 個，說明串口已經(jīng)發(fā)送了一些數(shù)據(jù)，程序可以用 Output 屬性繼續(xù)發(fā)送數(shù)據(jù)。3 ComEvCTS Clear To Send 信號線狀態(tài)發(fā)生變化。4 ComEvDSR Data Set Ready 信號線狀態(tài)從 1 變到 0。5 ComEvCD Carrier Detect 信號線狀態(tài)發(fā)生變化。河北聯(lián)合大學電氣工程學院426 ComEvRing 檢測到振鈴信號。7 ComEvEOF 接受到文件結(jié)束符。 VB 編程部分 Form1 內(nèi)容Form1 如圖 421；圖 421 Form1**************************定義變量*************Dim nowx As Integer ’現(xiàn)在的 x 軸的位置Dim maxplotno As Long ’最長的 x 軸的范圍Dim start As BooleanDim t%Dim m0!, m1!, mt!, W1!, W2!, Rt!, RI!**************