【文章內(nèi)容簡介】 都是一些常用的函數(shù)。 Vb 腳本基本語法與 vb 一致，數(shù)據(jù)類型，條件語句，都是一樣的。熟悉 vb 的話可以很快上手，就算武漢科技大學(xué)本科畢業(yè)設(shè)計(jì) 17 沒有 vb 基礎(chǔ)，也可以通過每個(gè)函 數(shù)的說明很容易實(shí)現(xiàn)相應(yīng)的功能。 腳本控制動(dòng)態(tài)標(biāo)題 比如我們需要一個(gè)主窗口，上面的 title 顯示程序信息，當(dāng)前畫面的信息，系統(tǒng)的時(shí)間與日期，中間顯示相應(yīng)的畫面，下面是一排導(dǎo)航按鈕。通過導(dǎo)航窗口切換不同的畫面，title 的信息也跟著變化。 設(shè)計(jì)好 title 和下面的導(dǎo)航按鈕，在畫面中間放置一個(gè)子窗口，在組件箱的畫面窗口中，通過切換子窗口中的內(nèi)容，就可以實(shí)現(xiàn)功能畫面的切換。我把子窗口命名 GALI，把下面導(dǎo)航按鈕的缺省文本改為需要切換的畫面信息，比如第一個(gè)按鈕我想點(diǎn)擊后切換到高壓與變頻其的畫面，我把缺省畫面改 為高壓與變頻。在畫面切換的過程中，我想 title中反應(yīng)畫面信息的文本也改變成高壓與變頻。我通過動(dòng)態(tài)文本實(shí)現(xiàn)，在運(yùn)行數(shù)據(jù)庫中新建一個(gè)內(nèi)部模擬變量 VD，命名為界面標(biāo)號(hào)，界面標(biāo)號(hào)等于 1 時(shí)上面的信息框就顯示高壓與變頻。 圖 動(dòng)態(tài)文本 雙擊高壓與變頻按鈕： 武漢科技大學(xué)本科畢業(yè)設(shè)計(jì) 18 圖 按鈕屬性 點(diǎn)擊處理腳本，彈出腳本編輯框。編程的思想是把子窗口中的畫面切換到高壓與變頻畫面，然后把內(nèi)部模擬變量界面標(biāo)號(hào)給設(shè)置為 1，在編輯窗口上面的菜單中點(diǎn)擊 畫面/改變子窗口，在選擇對(duì)象名稱中選擇已經(jīng)放置好的子窗口‘ gali’，在畫面選擇 窗口中選擇高壓及變頻，編輯器自動(dòng)寫出如下代碼： gali ,高壓及變頻 .drw 然后點(diǎn)擊上面快捷菜單的變量 /設(shè)置變量的值，在變量選擇窗口中選擇內(nèi)部模擬變量/界面標(biāo)號(hào)，自動(dòng)生成如下代碼： VA,界面標(biāo)號(hào) ,1,x， 將最后的那個(gè) x 改為我們想要設(shè)置的值，這里我們改為 1。 通過上面的一個(gè)簡單的例子，可見腳本的應(yīng)用相當(dāng)?shù)暮唵戊`活，在要實(shí)現(xiàn)負(fù)責(zé)功能時(shí)，更能體現(xiàn)其靈活方便。 武漢科技大學(xué)本科畢業(yè)設(shè)計(jì) 19 腳本實(shí)現(xiàn)單窗口多操作 開關(guān)不光要反應(yīng) 真實(shí)開關(guān)的狀態(tài)，還要實(shí)現(xiàn)遠(yuǎn)程控制，就是操作員在需要合上開關(guān)時(shí)可以在計(jì)算機(jī)上實(shí)現(xiàn)開關(guān)的控制。分析發(fā)現(xiàn)，開關(guān)操作的界面可以設(shè)計(jì)成一樣的，只是在點(diǎn)擊相應(yīng)的開關(guān)后只對(duì)相應(yīng)的開關(guān)進(jìn)行合分控制。 開關(guān)控制界面如下，識(shí)別開關(guān)通過新建內(nèi)部文本變量高壓開關(guān)標(biāo)號(hào)，點(diǎn)擊不同的開關(guān)把這個(gè)文本變量設(shè)置為相應(yīng)的開關(guān)標(biāo)號(hào)，然后通過程序判斷需要對(duì)那個(gè)開關(guān)操作。雙擊畫好的開關(guān)，在屬性窗口中的鼠標(biāo)事件中點(diǎn)擊左鍵，選擇處理腳本，要實(shí)現(xiàn)的功能是先設(shè)置內(nèi)部文本變量高壓開關(guān)標(biāo)號(hào)，然后彈出開關(guān)操作窗口，比如說高壓開關(guān) ，具體代碼如下： 高壓開關(guān)標(biāo)號(hào) ,1, 高壓開關(guān)分合 .drw,1,1,200,90 第二行后面的兩個(gè)合閘按鈕，選擇處理腳本，首先要讀取高壓開關(guān)標(biāo)號(hào)，以確定要對(duì)哪個(gè)開關(guān)進(jìn)行操作，然后在對(duì)相應(yīng)開關(guān)操作。 圖 開關(guān)操作 通過 select 語句實(shí)現(xiàn)，具體代碼如下： s=(高壓開關(guān)標(biāo)號(hào) ,1) Select Case s Case AR,1CB 斷路器控制 ,1,1 Case AR,2GB 斷路器控制 ,1,1 Case AR,3GB 斷路器控制 ,1,1 Case AR,4GB 斷路器控制 ,1,1 Case AR,5GB 斷路器控制 ,1,1 Case AR,6GB 斷路器控制 ,1,1 Case AR,7GB 斷路器控制 ,1,1 Case AR,8GB 斷路器控制 ,1,1 Case AR,9GB 斷路器控制 ,1,1 Case AR,10GB 斷路器控 ,1,1 Case AR,13GB 斷路器控 ,1,1 End Select 與合閘功能類似，分閘功能按鈕也可以通過以上代碼實(shí)現(xiàn)，只是將每個(gè) case 最后面武漢科技大學(xué)本科畢業(yè)設(shè)計(jì) 20 的 1 改為 0。 低壓開關(guān)的操作也與高 壓開關(guān)的類似，為了區(qū)分遠(yuǎn)程和就地操作，在通信協(xié)議中，規(guī)定合閘寫 1，分閘寫 2，代碼結(jié)構(gòu)與高壓開關(guān)的類似，只是寫的數(shù)值不一樣。 很多類似的功能都可以用以上方法實(shí)現(xiàn)，新建一個(gè)內(nèi)部變量用作標(biāo)識(shí)，在彈出的操作框中通過內(nèi)部標(biāo)識(shí)來判斷需要對(duì)哪個(gè)對(duì)象加以操作。 高壓綜合保護(hù)儀表的數(shù)據(jù)顯示也是通過這個(gè)方法，不過顯示的內(nèi)容也要跟著變化。也是先新建內(nèi)部變量高壓綜保標(biāo)識(shí)，在高壓與變頻界面上要顯示的地方顯示一相的電流，通過點(diǎn)擊這個(gè)變量框，彈出詳細(xì)數(shù)據(jù)窗口，在詳細(xì)窗口中顯示相應(yīng)的數(shù)據(jù)。詳細(xì)窗口如下： 假如點(diǎn)擊的是 3GB 綜保，先應(yīng)把 綜保標(biāo)識(shí)置為相應(yīng)的數(shù)字，然后彈出詳細(xì)窗口顯示3GB 的數(shù)據(jù)，彈出窗口通過綜保標(biāo)識(shí)來判斷要顯示的是哪個(gè)綜保的數(shù)據(jù)，具體實(shí)現(xiàn)如下： 在 3GB 綜保顯示框的單擊左鍵鼠標(biāo)時(shí)間中，添加如下代碼： VA,綜保標(biāo)志 ,1,2 綜合繼電器保護(hù)數(shù)據(jù) .drw\title=3GB 綜 保 數(shù) 據(jù),1,1,225,196 把詳細(xì)綜保數(shù)據(jù)的每一個(gè)變量框命名，以便腳本操作，比如顯示 A 相電流的變量框命名為 IA，以此類推。在綜保詳細(xì)數(shù)據(jù)窗口中添加定時(shí)器，在 組件箱的畫面編程中，時(shí)間改為 0，連續(xù)執(zhí)行，處理的腳本如下 x=(VA,綜保標(biāo)志 ,1) Select Case x Case 0 IA,AI,1CB 遙測(cè)信號(hào) IA IB,AI,1CB 遙測(cè)信號(hào) IB IC,AI,1CB 遙測(cè)信號(hào) IC UAB,AI,1CB 遙測(cè)信號(hào) UAB UBC,AI,1CB 遙測(cè)信號(hào) UBC UCA,AI,1CB 遙測(cè)信號(hào) UCA 頻率 ,AI,1CB 遙測(cè)信號(hào)頻率 有功功率 ,AI,1CB 遙測(cè)信號(hào)有功功率 無功 功率 ,AI,1CB 遙測(cè)信號(hào)無功功率 Case 1 IA,AI,2GB 遙測(cè)信號(hào) IA IB,AI,2GB 遙測(cè)信號(hào) IB IC,AI,2GB 遙測(cè)信號(hào) IC 武漢科技大學(xué)本科畢業(yè)設(shè)計(jì) 21 UAB,AI,2GB 遙測(cè)信號(hào) UAB UBC,AI,2GB 遙測(cè)信號(hào) UBC UCA,AI,2GB 遙測(cè)信號(hào) UCA 頻率 ,AI,2GB 遙測(cè)信號(hào)頻率 有功功率 ,AI,2GB 遙測(cè)信號(hào)有功功率 無功功率 ,AI,2GB 遙測(cè)信號(hào)無功功率 Case 2 IA,AI,3GB 遙測(cè)信號(hào) IA IB,AI,3GB 遙測(cè)信號(hào) IB IC,AI,3GB 遙測(cè)信號(hào) IC UAB,AI,3GB 遙測(cè)信號(hào) UAB UBC,AI,3GB 遙測(cè)信號(hào) UBC UCA,AI,3GB 遙測(cè)信號(hào) UCA 頻率 ,AI,3GB 遙測(cè)信號(hào)頻率 有功功率 ,AI,3GB 遙測(cè)信號(hào)有功功率 無功功率 ,AI,3GB 遙測(cè)信號(hào)無功功率 Case 3 IA,AI,4GB 遙測(cè)信號(hào) IA IB,AI,4GB 遙測(cè)信號(hào) IB IC,AI,4GB 遙測(cè)信號(hào) IC UAB,AI,4GB 遙測(cè)信號(hào) UAB UBC,AI,4GB 遙測(cè)信號(hào) UBC UCA,AI,4GB 遙測(cè)信號(hào) UCA 頻率 ,AI,4GB 遙測(cè)信號(hào)頻率 有功功率 ,AI,4GB 遙測(cè)信號(hào)有功功率 無功功率 ,AI,4GB 遙測(cè)信號(hào)無功功率 Case 4 IA,AI,5GB 遙測(cè)信號(hào) IA IB,AI,5GB 遙測(cè)信號(hào) IB IC,AI,5GB 遙測(cè)信號(hào) IC UAB,AI,5GB 遙測(cè)信號(hào) UAB UBC,AI,5GB 遙測(cè)信號(hào) UBC UCA,AI,5GB 遙測(cè)信號(hào) UCA 頻率 ,AI,5GB 遙測(cè)信號(hào)頻率 武漢科技大學(xué)本科畢業(yè)設(shè)計(jì) 22 有功 功率 ,AI,5GB 遙測(cè)信號(hào)有功功率 無功功率 ,AI,5GB 遙測(cè)信號(hào)無功功率 Case 5 IA,AI,6GB 遙測(cè)信號(hào) IA IB,AI,6GB 遙測(cè)信號(hào) IB IC,AI,6GB 遙測(cè)信號(hào) IC UAB,AI,6GB 遙測(cè)信號(hào) UAB UBC,AI,6GB 遙測(cè)信號(hào) UBC UCA,AI,6GB 遙測(cè)信號(hào) UCA 頻率 ,AI,6GB 遙測(cè)信號(hào)頻率 有功功率 ,AI,6GB 遙測(cè)信號(hào)有功功率 無功功率 ,AI,6GB 遙測(cè)信號(hào)無功功率 Case 6 IA,AI,7GB 遙測(cè)信號(hào) IA IB,AI,7GB 遙測(cè)信號(hào) IB IC,AI,7GB 遙測(cè)信號(hào) IC UAB,AI,7GB 遙測(cè)信號(hào) UAB UBC,AI,7GB 遙測(cè)信號(hào) UBC UCA,AI,7GB 遙測(cè)信號(hào) UCA 頻率 ,AI,7GB 遙測(cè)信號(hào)頻率 有功功率 ,AI,7GB 遙測(cè)信號(hào)有功功率 無功功率 ,AI,7GB 遙測(cè)信號(hào)無功功率 Case 7 IA,AI,8GB 遙測(cè)信號(hào) IA IB,AI,8GB 遙測(cè)信號(hào) IB IC