利用VBA快速開發(fā)能效測評技術(shù)文件收集系統(tǒng)的研究

0 引言

為貫徹《民用建筑節(jié)能條例》和《江蘇省綠色建筑發(fā)展條例》，加快建設(shè)節(jié)能型公共建筑和居住建筑，在民用建筑節(jié)能驗收時需要進行建筑能效測評

。建筑能效測評即綜合判定建筑能耗及用能效率的檢測方法，對測評建筑進行軟件評估、性能檢測、現(xiàn)場檢查、計算分析，得出建筑相對節(jié)能率和用能水平

。

建筑能效測評應(yīng)在技術(shù)文件準(zhǔn)備齊全的基礎(chǔ)上進行。技術(shù)文件包括項目立項、審批文件，施工圖設(shè)計文件，保溫材料檢測報告及用能系統(tǒng)運行調(diào)試報告等

。技術(shù)文件收集往往是最耗時的階段，因為涉及文件種類多的原因，往往會造成文件的漏項。

筆者嘗試?yán)肰BA(VisualBasic for Applications)快速開發(fā)能效測評技術(shù)文件收集系統(tǒng)，VBA具有以下優(yōu)勢

：

1）易獲取性。VBA內(nèi)置于Office和WPS中，用戶不需要單獨下載。

2）易讀性。VBA是Visual Basic的一種宏語言，易學(xué)易寫且易讀。

3）便捷性。能夠快速編寫程序，并且能夠快捷地創(chuàng)建用戶交互界面。

CCK-8檢測結(jié)果顯示，在SW480細胞中過表達miR-454-3p后，細胞的生長受到了明顯的促進（圖3左），組間差異顯著（P＜0.05）。同時，細胞克隆形成實驗結(jié)果顯示，miR-454-3p mimics轉(zhuǎn)染組較陰性對照組細胞在培養(yǎng)1周后出現(xiàn)較多細胞克?。▓D3右），組間差異顯著（P＜0.05）。

發(fā)芽勢是衡量種子發(fā)芽速度和發(fā)芽情況的指標(biāo)，同時也反映了種子生物活性的高低。不同濃度的海水對厚萼凌霄種子的發(fā)芽勢的影響見圖2。

1 技術(shù)文件條款及程序開發(fā)思路

1.1 技術(shù)文件條款

Set Nodx=TreeView1.Nodes.Add("項目立項",tvwChild,,"建筑工程施工許可證"&":"&ThisWorkbook.Worksheets("能效測評技術(shù)文件收集").Range("c12"))

由表1可知，技術(shù)文件收集有以下難點：

初始化窗體，打開窗體時UserForm_Initialize事件發(fā)生，程序加載已填入的項目基本信息及技術(shù)文件收集進度。在窗體中添加創(chuàng)建文件收集文件夾程序、技術(shù)文件收集程序以及TreeView控件程序等。

2）技術(shù)文件類型不同。如項目立項文件是pdf文件，施工圖紙是dwg文件，設(shè)備出廠報告是doc文件等。

3）項目類型不同。如毛坯建筑往往沒有冷熱源，居住建筑沒有幕墻，有些項目沒有進行綠色建筑模擬等。

1.2 程序開發(fā)思路

開發(fā)的能效測評技術(shù)文件收集程序，遵循用戶使用方便、用戶交互界面簡潔、操作流程明確的原則。創(chuàng)建Excel模板，以記錄項目基本信息和技術(shù)文件收集狀態(tài)。創(chuàng)建窗體，插入多頁控件(Multipage)和樹形目錄控件(TreeView)。Page1“項目基本信息輸入頁面”插入標(biāo)簽控件(Label)、文本控件(TextBox)以及命令按鈕控件(CommandButton)等，以便用戶輸入項目基本信息和生成技術(shù)文件收集文件夾。Page2“技術(shù)文件收集程序頁面”撰寫技術(shù)文件收集程序。TreeView控件顯示技術(shù)文件收集的程度和狀態(tài)。程序開發(fā)思路見圖1。

創(chuàng)建Excel模板，并且對單元格進行賦值，可以縮減程序代碼量，同時顯示和保存技術(shù)文件收集的狀態(tài)，也有利于打印。單元格“A1:A6”依次輸入“項目名稱”“項目地址”“建設(shè)單位”“設(shè)計單位”“監(jiān)理單位”“施工單位”。單元格“B1:B6”顯示Page1“項目基本信息輸入頁面”輸入的項目基本信息。單元格“A8:A36”輸入“項目立項審批文件”“施工圖設(shè)計文件”“建筑節(jié)能工程驗收記錄”“見證檢測報告”“設(shè)備出廠報告及清單”“綠色建筑模擬報告技術(shù)文件”這6個一級條款。單元格“A8:A37”輸入基本條款細分出的30個二級條款。單元格“C8:C37”輸入“缺少文件或無需此類文件”，同時會根據(jù)Page2“技術(shù)文件收集程序頁面”中的用戶操作改變單元格內(nèi)容。創(chuàng)建的Excel模板（見表2）。

VBA工程(VBAProject)由Microsoft Excel對象、窗體、類模塊、模塊四部分組成。本程序主要利用VBAProject中窗體部分，窗體由Label、Text-Box、CommandButton等控件組成。本程序主要利用的控件和其功能見表3。

2 技術(shù)文件收集程序的編寫

2.1 創(chuàng)建窗體

按ALT+F11打開VBAProject，插入窗體，然后依次插入MultiPage、Label、TextBox、Command-Button、TreeView控件。調(diào)整窗體尺寸，控件尺寸，控件格式（間距、位置、對齊），使窗體界面顯示合理。創(chuàng)建的窗體如圖2所示。

2.2 主體程序

1）技術(shù)文件條款種類多。細分有項目立項審批文件、施工圖設(shè)計文件、建筑節(jié)能工程驗收記錄、見證檢測報告、設(shè)備出廠報告及清單、綠色建筑模擬報告6個大類。

培肥技術(shù)能在有機農(nóng)業(yè)生產(chǎn)過程中改善種植條件，優(yōu)化農(nóng)作物的生長土壤，增強土壤的肥力及有機物質(zhì)，促進其健康生長。培肥技術(shù)的使用，需先充分了解種植土地的物理及化學(xué)性質(zhì)，然后將有機農(nóng)作物種植在利于其生長的土地中，要求具備較強的平衡能力，科學(xué)規(guī)劃種植土地，以保證土地肥力的持久性。在施肥過程中，要調(diào)節(jié)好土地的酸堿度，確保土壤成分均衡，適宜農(nóng)作物生長，達到保護并持續(xù)使用土壤的目的。

創(chuàng)建技術(shù)文件收集文件夾，使文件歸類放置，且方便測評人員查閱。創(chuàng)建文件收集文件夾程序代碼（見圖3）。

中小型基藥配送企業(yè)一般銷售規(guī)模較小，資金實力較弱，上游來貨渠道主要為商業(yè)調(diào)撥。實施“兩票制”后，此類企業(yè)難以取得生產(chǎn)企業(yè)藥品配送權(quán)，業(yè)務(wù)量必然下降，市場份額很可能被實力較強的企業(yè)占有。如果不進行經(jīng)營模式轉(zhuǎn)型，這類企業(yè)將面臨較大的生存壓力。

隨著對肺癌研究的逐漸深入，繼表皮生長因子之后，ALK基因被認(rèn)為是肺癌的又一主要驅(qū)動基因，其中肺腺癌ALK陽性率為2%～7%。隨著腫瘤分子靶向治療的快速發(fā)展，對于肺腺癌的分子靶向治療取得了重大的進步，其中ALK抑制劑克唑替尼在肺腺癌間變性淋巴瘤激酶陽性患者的治療中療效明顯[1]。本文探究肺腺癌間變性淋巴瘤激酶陽性(ALK)患者的臨床病理特征并觀察采用克唑替尼治療的臨床療效，報告如下。

點擊命令按鈕，彈出MsgBox對話框。選擇“是”上傳技術(shù)文件，上傳文件類型不受到限制，上傳并且保存文件到文件夾中，且對文件進行重命名。標(biāo)簽控件顯示“已上傳文件”，標(biāo)簽背景顏色更改為紅色；選擇“否”，標(biāo)簽控件顯示“待上傳文件”，標(biāo)簽背景顏色更改為綠色；選擇“取消”，標(biāo)簽控件顯示“缺少文件或無需文件”，標(biāo)簽背景顏色更改為綠色。技術(shù)文件收集程序代碼，見圖4。由于篇幅所限，本文只截取“立項文件”收集程序代碼，其他技術(shù)文件收集程序邏輯均一致。

流動相在高效液相色譜法中至關(guān)重要，考察了甲醇-乙酸-水、乙腈-水作為流動相的分離效果。結(jié)果表明，10種酚類物質(zhì)在甲醇-乙酸-水體系中分離效果較好，通過反復(fù)摸索調(diào)整梯度洗脫程序，峰形和分離度達到要求。流動相A為甲醇-乙酸-水(90∶2∶8)，流動相B為甲醇-乙酸-水(10∶2∶88)，流速為1.0 mL/min，洗脫程序見表1。結(jié)果表明，10種酚類物質(zhì)在25 min之內(nèi)均得到了良好的分離，此條件下標(biāo)準(zhǔn)品的色譜圖見圖1。

Set Nodx=TreeView1.Nodes.Add("項目立項",tvwChild,,"建設(shè)工程規(guī)劃許可證"&":"&ThisWorkbook.Worksheets("能效測評技術(shù)文件收集").Range("c10"))

TreeView控件如同Windows的資源管理器目錄，用來顯示信息的分級視圖

。TreeView控件各個分級信息都有一個Node對象，顯示Node的分層結(jié)構(gòu)目錄。窗體及TreeView控件顯示效果見圖5。本文僅展示利用TreeView編寫“項目立項審批文件”層次結(jié)構(gòu)程序代碼，其他技術(shù)文件層次結(jié)構(gòu)編寫邏輯均一致，程序代碼如下：

'設(shè)置三級節(jié)點：發(fā)改委立項通知、國土證、建設(shè)工程規(guī)劃許可證、建設(shè)用地規(guī)劃許可證、建筑工程施工許可證、施工圖設(shè)計審查合格證書、建筑施工設(shè)計文件審查意見書

Set Nodx=TreeView1.Nodes.Add("項目立項",tvwChild,,"發(fā)改委立項通知"&":"&This-Workbook.Worksheets("能效測評技術(shù)文件收集").Range("c8"))

Set Nodx=TreeView1.Nodes.Add("項目立項",tvwChild,,"國土證"&":"&ThisWorkbook.Worksheets("能效測評技術(shù)文件收集").Range("c9"))

問題情境教學(xué)就是指依據(jù)課程標(biāo)準(zhǔn)，結(jié)合具體的課時、教學(xué)目標(biāo)，設(shè)計與教學(xué)內(nèi)容相關(guān)的問題情境，進而引導(dǎo)學(xué)生通過討論、探索，獲取新知識的一種教學(xué)手段。問題情境教學(xué)是一種發(fā)展性教學(xué)，可以讓學(xué)生開展系統(tǒng)、獨立的探究活動，在問題情境的創(chuàng)設(shè)、提出和解決的基礎(chǔ)上構(gòu)建自己的方法體系。

Set Nodx=TreeView1.Nodes.Add("項目立項",tvwChild,,"建設(shè)用地規(guī)劃許可證"&":"&ThisWorkbook.Worksheets("能效測評技術(shù)文件收集").Range("c11"))

能效測評應(yīng)在技術(shù)文件準(zhǔn)備齊全的基礎(chǔ)上進行，所需技術(shù)文件見表1。

通過研究地理條件、氣候條件、人文條件等方面對鄉(xiāng)村旅游養(yǎng)老目的地選擇的影響，我們闡述了無錫作為旅游養(yǎng)老目的地的有利之處，還提出了在旅游養(yǎng)老目的地建立之后，風(fēng)景區(qū)的構(gòu)建與發(fā)展策略，這些發(fā)展策略從實際出發(fā)，與當(dāng)前旅游發(fā)展趨勢大體一致。

Set Nodx=TreeView1.Nodes.Add("項目立項",tvwChild,,"施工圖設(shè)計審查合格證書"&":"&ThisWorkbook.Worksheets("能效測評技術(shù)文件收集").Range("c13"))

Set Nodx=TreeView1.Nodes.Add("項目立項",tvwChild,,"建筑施工設(shè)計文件審查意見書"&":"&ThisWorkbook.Worksheets("能效測評技術(shù)文件收集").Range("c14"))

……

MSJ5.8/1.6D型礦山豎井掘進機的鑿井工藝可歸納為以下過程：首先采用反井鉆機施工導(dǎo)井，導(dǎo)井施工完成后，施工井筒鎖口，并安裝豎井掘進機和相關(guān)輔助設(shè)備，利用豎井掘進機進行擴井。豎井掘進機運行過程中，巖渣自導(dǎo)井掉落至下部水平巷道，由下部運輸系統(tǒng)裝運。豎井掘進機掘進井筒至一定深度后，安裝吊盤和保護盤，向下掘進的同時完成井壁支護。豎井掘進機掘進至井筒底部，拆除吊掛系統(tǒng)，利用專用井架將豎井掘進機提出地面，完成井筒施工。

End Sub

(1) 隨塔里木荒漠綠洲過渡帶胡楊林退化程度加劇，林地土壤容重與非毛管孔隙度、土壤通氣度增大，黏粒、粉粒含量與毛管孔隙度降低。土壤質(zhì)地粗化，持水保土功效減弱，這是系統(tǒng)自身脆弱生態(tài)基質(zhì)受強烈風(fēng)蝕作用和人類干擾下植被退化共同作用的結(jié)果。

3 結(jié)論

1）利用VBA可以快速開發(fā)能效測評資料收集程序，程序化能效測評技術(shù)文件收集階段。同時創(chuàng)建用戶交互界面，方便用戶操作。

2）利用TreeView控件可以直觀地顯示出文件和目錄結(jié)構(gòu)、文檔中的類層次。

3）利用VBA開發(fā)其他資料收集系統(tǒng)是可行的。

[1]民用建筑能效測評標(biāo)識標(biāo)準(zhǔn):DB32/T 3964-2020[S].江蘇:江蘇鳳凰科學(xué)出版社,2021.

[2]王建玉.基于綠色建筑的能效測評技術(shù)體系構(gòu)建[J].建筑節(jié)能,2018,46(12):32-35.

[3]許丹菁,龔紅衛(wèi),仇崢,高興歡.建筑能效測評中資料取證[J].能源研究與管理,2013(1):106-110.

[4]Excel Home.別怕，ExcelVBA其實很簡單[M].北京:人民郵電出版社,2012.

[5]邱海濱.TreeView控件的設(shè)計與應(yīng)用[D].電子科技大學(xué),2010.