張勇

【摘 要】運用VB和Excel結(jié)合，開發(fā)防雷行政許可文檔系統(tǒng)，可充分利用VB程序的界面友好，數(shù)據(jù)輸入靈活高效的長處，又能利用Excel可快速生成精美表格文書，單元格可跨表引用的自動化更新的優(yōu)點。

【關(guān)鍵詞】VB Excel；行政許可；系統(tǒng)；設(shè)計

防雷裝置設(shè)計審核和竣工驗收（以下簡稱防雷行政許可）是氣象主管機構(gòu)行政許可的重要內(nèi)容。相對于其他非行政許可審批項目事項而言，防雷行政許可具有申報量大、文書檔案多等特點。根據(jù)《防雷裝置設(shè)計審核和竣工驗收規(guī)定》（中國氣象局令第21號）附表所列，完成整個防雷行政許可辦理流程，產(chǎn)生的各種文書可有14種之多。再加上根據(jù)行政許可法要求的《送達(dá)回證》等文書，則數(shù)量更多。如果采用純手工操作，如此之多的文書檔案制作，辦事人員的工作量既繁重，又容易出錯。為了向公眾提供優(yōu)質(zhì)、高效、便捷、公正的行政審批服務(wù)，減輕辦事窗口工作人員的工作強度，設(shè)計了防雷行政許可文檔系統(tǒng)，經(jīng)測試后投入使用。

1.開發(fā)工具的選擇

選擇合適的開發(fā)工具，往往會起到事半功倍的效果。由于該系統(tǒng)主要用于窗口前臺，對開放性要求不高，而VB具有如下特點：（1）可視化的編程環(huán)境，無需編寫大量的代碼去描述界面元素的外觀和環(huán)境。（2）面向?qū)ο蟮某绦蛟O(shè)計思想。（3）支持對象的鏈接與嵌入技術(shù)。VB的核心是對對象的鏈接與嵌入（OLE）技術(shù)的支持，它是訪問所有對象的一種方法。利用OLE技術(shù)，能夠開發(fā)集聲音、圖像、動畫、字處理、Web等對象于一體的程序。（4）軟件的集成式開發(fā)。VB為編程提供了一個集成開發(fā)環(huán)境。在這個環(huán)境中，編程者可設(shè)計界面、編寫代碼、調(diào)試程序，直至把應(yīng)用程序編譯成可在Windows中運行的可執(zhí)行文件，并為它生成安裝程序。VB的集成開發(fā)環(huán)境為編程者提供了很大的方便。因此。VB簡單易用、開發(fā)效率高，選用作本系統(tǒng)的編程工具。

由于VB對輸出復(fù)雜的中國式表格和格式文檔有點力不從心，而Excel工作表可以設(shè)計出相當(dāng)復(fù)雜的表格和十分精美的文字樣式，因此，選擇Excel作為嵌入的對象，先利用Excel設(shè)計好文書檔案模板，然后利用VB將有關(guān)數(shù)據(jù)填充到Excel表格相應(yīng)的單元格中，即可生成所需的輸出文檔。

2.系統(tǒng)設(shè)計思路

2.1 防雷行政許可業(yè)務(wù)流程

防雷行政許可事項包括防雷裝置設(shè)計審核和防雷裝置竣工驗收兩大部分。其業(yè)務(wù)流程基本相同，通常都是【收件】→【受理】→【審查】→【決定】。其流程圖和輸出文檔如圖1所示。

圖1 防雷行政許可業(yè)務(wù)流程圖

2.2 系統(tǒng)功能結(jié)構(gòu)

防雷行政許可文檔系統(tǒng)根據(jù)不同的業(yè)務(wù)事項，有不同的功能模塊。各子系統(tǒng)及功能如下：（1）登錄子系統(tǒng)：操作員身份驗證。（2）設(shè)計審核子系統(tǒng)：辦理防雷設(shè)計審核業(yè)務(wù)。（3）竣工驗收子系統(tǒng)：辦理防雷竣工驗收業(yè)務(wù)。（4）查詢子系統(tǒng)：查詢以往業(yè)務(wù)記錄。（5）打印子系統(tǒng)：打印輸出各種文檔。其功能體系結(jié)構(gòu)如圖2所示。

圖2 系統(tǒng)功能體系結(jié)構(gòu)

2.3 Excel文檔模版的設(shè)計

Excel表的引入，主要目的就是生成符合規(guī)定形式的行政許可文書。由于Excel的單元格可以跨工作表引用，故先設(shè)計一個工作表存放每宗申請的所有信息，稱為“基本信息”工作表。然后根據(jù)相關(guān)規(guī)定的文本格式，每種文書設(shè)計一個相應(yīng)的工作表，如“接收材料清單”、“設(shè)計審核申報表”、“設(shè)計審核申請書”、“審核材料補正通知”等一系列的工作表。除“基本信息”以外的各種工作表，表中需填充數(shù)據(jù)信息的單元格，均引用自“基本信息”表中相應(yīng)的單元格。這樣，只需用VB編程修改“基本信息”工作表的數(shù)據(jù)，則所有的工作表的數(shù)據(jù)信息都自動進行修改，形成各種文書檔案。如需增加文書種類，則增加工作表，引用相應(yīng)單元格即可，大大減輕了系統(tǒng)開發(fā)的工作量。每宗行政許可申請，就復(fù)制一份Excel模版，以“申請編號”加“申請人名稱”加“項目名稱”為文件名，再往該Excel工作簿寫入數(shù)據(jù)保存，就能得到一份電子版的文書檔案。

2.4 VB編程的作用

用VB進行編程的目的，就是為系統(tǒng)使用者提供一個友好的用戶界面，便于用戶進行數(shù)據(jù)錄入、查詢、打印輸出等操作。如《防雷裝置設(shè)計審核申報表》中的結(jié)構(gòu)類型、使用類別等繁多的選項，均用組合框控件Combox控件來輔助輸入，用戶只需點擊選擇即可錄入，無需記憶諸多的類別名稱和輸入文字，達(dá)到快捷準(zhǔn)確的目的。打印輸出時，可任意選擇打印的文書種類，不熟悉Excel的使用也能操作。

圖3 系統(tǒng)主界面

3.系統(tǒng)設(shè)計編程要點

3.1用VB操作Excel表格

Vb是通過Excel的各種對象來控制Excel工作的。每個對象都有各自的方法和屬性。通過方法可以實現(xiàn)對對象的控制，而修改屬性和可以改變對象的各種狀態(tài)。EXCEL是以層次結(jié)構(gòu)組織對象的，在EXCEL對象的層次結(jié)構(gòu)中，最頂層是Application對象，是Excel本身。從該對象開始往下依次是： Workbooks對象集，是Application對象的下層，其指的是Excel的工作簿文件。Worksheets對象集，是Workbooks對象集的下層，它表示的是Excel的一個工作表。Cells和Range對象，它們是worksheets對象的下層，它則指向Excel工作表中的一個或多個單元格。要控制Excel中的單元格（即Cells和Range對象），就必須從Excel層次結(jié)構(gòu)對象的最上層即Application對象開始遍歷，訪問Cells和Range對象，用VB語句對該對象進行賦值，就達(dá)到了向指定單元格寫入數(shù)據(jù)的目的。 （下轉(zhuǎn)第200頁）

（上接第82頁）3.2系統(tǒng)設(shè)計中的幾點注意事項

3.2.1檢測Excel模版工作簿和用戶數(shù)據(jù)Excel表是否正在運行

由于VB程序和Excel分屬不同的系統(tǒng)，VB編寫的程序和Excel可同時運行。當(dāng)用VB程序訪問已經(jīng)用Excel軟件打開的Excel表時，會出現(xiàn)自動化錯誤。故系統(tǒng)應(yīng)有檢測當(dāng)前Excel是否正在運行，如運行，則要先關(guān)閉。

3.2.2 系統(tǒng)運行時設(shè)置Excel不可見

如果VB調(diào)用Excel時沒有設(shè)置Excel不可見，那么Excel表的界面就和用Excel軟件打開沒什么兩樣，而且兩邊都可以進行修改，這樣極易造成混亂，引發(fā)錯誤。所以，需在編程時設(shè)置Excel不可見，一切對Excel表的操作都由VB程序來進行。

4.結(jié)語

本系統(tǒng)重點在于生成行政許可的格式文書檔案，用VB結(jié)合Excel進行開發(fā)，編程工作量可大幅減少，而又可以輸出精美的格式文書，非VB直接輸出可比擬。通過系統(tǒng)試運行，達(dá)到了快捷高效的目的，反映良好。

如結(jié)合數(shù)據(jù)庫應(yīng)用開發(fā)，可升級為行政服務(wù)窗口信息管理系統(tǒng)，還有很大的發(fā)展上升空間。 [科]