利用VBA快速开发能效测评技术文件收集系统的研究

0 引言

为贯彻《民用建筑节能条例》和《江苏省绿色建筑发展条例》，加快建设节能型公共建筑和居住建筑，在民用建筑节能验收时需要进行建筑能效测评

。建筑能效测评即综合判定建筑能耗及用能效率的检测方法，对测评建筑进行软件评估、性能检测、现场检查、计算分析，得出建筑相对节能率和用能水平

。

建筑能效测评应在技术文件准备齐全的基础上进行。技术文件包括项目立项、审批文件，施工图设计文件，保温材料检测报告及用能系统运行调试报告等

。技术文件收集往往是最耗时的阶段，因为涉及文件种类多的原因，往往会造成文件的漏项。

笔者尝试利用VBA(VisualBasic for Applications)快速开发能效测评技术文件收集系统，VBA具有以下优势

：

1）易获取性。VBA内置于Office和WPS中，用户不需要单独下载。

2）易读性。VBA是Visual Basic的一种宏语言，易学易写且易读。

3）便捷性。能够快速编写程序，并且能够快捷地创建用户交互界面。

CCK-8检测结果显示，在SW480细胞中过表达miR-454-3p后，细胞的生长受到了明显的促进（图3左），组间差异显著（P＜0.05）。同时，细胞克隆形成实验结果显示，miR-454-3p mimics转染组较阴性对照组细胞在培养1周后出现较多细胞克隆（图3右），组间差异显著（P＜0.05）。

发芽势是衡量种子发芽速度和发芽情况的指标，同时也反映了种子生物活性的高低。不同浓度的海水对厚萼凌霄种子的发芽势的影响见图2。

1 技术文件条款及程序开发思路

1.1 技术文件条款

Set Nodx=TreeView1.Nodes.Add("项目立项",tvwChild,,"建筑工程施工许可证"&":"&ThisWorkbook.Worksheets("能效测评技术文件收集").Range("c12"))

由表1可知，技术文件收集有以下难点：

初始化窗体，打开窗体时UserForm_Initialize事件发生，程序加载已填入的项目基本信息及技术文件收集进度。在窗体中添加创建文件收集文件夹程序、技术文件收集程序以及TreeView控件程序等。

2）技术文件类型不同。如项目立项文件是pdf文件，施工图纸是dwg文件，设备出厂报告是doc文件等。

3）项目类型不同。如毛坯建筑往往没有冷热源，居住建筑没有幕墙，有些项目没有进行绿色建筑模拟等。

1.2 程序开发思路

开发的能效测评技术文件收集程序，遵循用户使用方便、用户交互界面简洁、操作流程明确的原则。创建Excel模板，以记录项目基本信息和技术文件收集状态。创建窗体，插入多页控件(Multipage)和树形目录控件(TreeView)。Page1“项目基本信息输入页面”插入标签控件(Label)、文本控件(TextBox)以及命令按钮控件(CommandButton)等，以便用户输入项目基本信息和生成技术文件收集文件夹。Page2“技术文件收集程序页面”撰写技术文件收集程序。TreeView控件显示技术文件收集的程度和状态。程序开发思路见图1。

创建Excel模板，并且对单元格进行赋值，可以缩减程序代码量，同时显示和保存技术文件收集的状态，也有利于打印。单元格“A1:A6”依次输入“项目名称”“项目地址”“建设单位”“设计单位”“监理单位”“施工单位”。单元格“B1:B6”显示Page1“项目基本信息输入页面”输入的项目基本信息。单元格“A8:A36”输入“项目立项审批文件”“施工图设计文件”“建筑节能工程验收记录”“见证检测报告”“设备出厂报告及清单”“绿色建筑模拟报告技术文件”这6个一级条款。单元格“A8:A37”输入基本条款细分出的30个二级条款。单元格“C8:C37”输入“缺少文件或无需此类文件”，同时会根据Page2“技术文件收集程序页面”中的用户操作改变单元格内容。创建的Excel模板（见表2）。

VBA工程(VBAProject)由Microsoft Excel对象、窗体、类模块、模块四部分组成。本程序主要利用VBAProject中窗体部分，窗体由Label、Text-Box、CommandButton等控件组成。本程序主要利用的控件和其功能见表3。

2 技术文件收集程序的编写

2.1 创建窗体

按ALT+F11打开VBAProject，插入窗体，然后依次插入MultiPage、Label、TextBox、Command-Button、TreeView控件。调整窗体尺寸，控件尺寸，控件格式（间距、位置、对齐），使窗体界面显示合理。创建的窗体如图2所示。

2.2 主体程序

1）技术文件条款种类多。细分有项目立项审批文件、施工图设计文件、建筑节能工程验收记录、见证检测报告、设备出厂报告及清单、绿色建筑模拟报告6个大类。

培肥技术能在有机农业生产过程中改善种植条件，优化农作物的生长土壤，增强土壤的肥力及有机物质，促进其健康生长。培肥技术的使用，需先充分了解种植土地的物理及化学性质，然后将有机农作物种植在利于其生长的土地中，要求具备较强的平衡能力，科学规划种植土地，以保证土地肥力的持久性。在施肥过程中，要调节好土地的酸碱度，确保土壤成分均衡，适宜农作物生长，达到保护并持续使用土壤的目的。

创建技术文件收集文件夹，使文件归类放置，且方便测评人员查阅。创建文件收集文件夹程序代码（见图3）。

中小型基药配送企业一般销售规模较小，资金实力较弱，上游来货渠道主要为商业调拨。实施“两票制”后，此类企业难以取得生产企业药品配送权，业务量必然下降，市场份额很可能被实力较强的企业占有。如果不进行经营模式转型，这类企业将面临较大的生存压力。

随着对肺癌研究的逐渐深入，继表皮生长因子之后，ALK基因被认为是肺癌的又一主要驱动基因，其中肺腺癌ALK阳性率为2%～7%。随着肿瘤分子靶向治疗的快速发展，对于肺腺癌的分子靶向治疗取得了重大的进步，其中ALK抑制剂克唑替尼在肺腺癌间变性淋巴瘤激酶阳性患者的治疗中疗效明显[1]。本文探究肺腺癌间变性淋巴瘤激酶阳性(ALK)患者的临床病理特征并观察采用克唑替尼治疗的临床疗效，报告如下。

点击命令按钮，弹出MsgBox对话框。选择“是”上传技术文件，上传文件类型不受到限制，上传并且保存文件到文件夹中，且对文件进行重命名。标签控件显示“已上传文件”，标签背景颜色更改为红色；选择“否”，标签控件显示“待上传文件”，标签背景颜色更改为绿色；选择“取消”，标签控件显示“缺少文件或无需文件”，标签背景颜色更改为绿色。技术文件收集程序代码，见图4。由于篇幅所限，本文只截取“立项文件”收集程序代码，其他技术文件收集程序逻辑均一致。

流动相在高效液相色谱法中至关重要，考察了甲醇-乙酸-水、乙腈-水作为流动相的分离效果。结果表明，10种酚类物质在甲醇-乙酸-水体系中分离效果较好，通过反复摸索调整梯度洗脱程序，峰形和分离度达到要求。流动相A为甲醇-乙酸-水(90∶2∶8)，流动相B为甲醇-乙酸-水(10∶2∶88)，流速为1.0 mL/min，洗脱程序见表1。结果表明，10种酚类物质在25 min之内均得到了良好的分离，此条件下标准品的色谱图见图1。

Set Nodx=TreeView1.Nodes.Add("项目立项",tvwChild,,"建设工程规划许可证"&":"&ThisWorkbook.Worksheets("能效测评技术文件收集").Range("c10"))

TreeView控件如同Windows的资源管理器目录，用来显示信息的分级视图

。TreeView控件各个分级信息都有一个Node对象，显示Node的分层结构目录。窗体及TreeView控件显示效果见图5。本文仅展示利用TreeView编写“项目立项审批文件”层次结构程序代码，其他技术文件层次结构编写逻辑均一致，程序代码如下：

'设置三级节点：发改委立项通知、国土证、建设工程规划许可证、建设用地规划许可证、建筑工程施工许可证、施工图设计审查合格证书、建筑施工设计文件审查意见书

Set Nodx=TreeView1.Nodes.Add("项目立项",tvwChild,,"发改委立项通知"&":"&This-Workbook.Worksheets("能效测评技术文件收集").Range("c8"))

Set Nodx=TreeView1.Nodes.Add("项目立项",tvwChild,,"国土证"&":"&ThisWorkbook.Worksheets("能效测评技术文件收集").Range("c9"))

问题情境教学就是指依据课程标准，结合具体的课时、教学目标，设计与教学内容相关的问题情境，进而引导学生通过讨论、探索，获取新知识的一种教学手段。问题情境教学是一种发展性教学，可以让学生开展系统、独立的探究活动，在问题情境的创设、提出和解决的基础上构建自己的方法体系。

Set Nodx=TreeView1.Nodes.Add("项目立项",tvwChild,,"建设用地规划许可证"&":"&ThisWorkbook.Worksheets("能效测评技术文件收集").Range("c11"))

能效测评应在技术文件准备齐全的基础上进行，所需技术文件见表1。

通过研究地理条件、气候条件、人文条件等方面对乡村旅游养老目的地选择的影响，我们阐述了无锡作为旅游养老目的地的有利之处，还提出了在旅游养老目的地建立之后，风景区的构建与发展策略，这些发展策略从实际出发，与当前旅游发展趋势大体一致。

Set Nodx=TreeView1.Nodes.Add("项目立项",tvwChild,,"施工图设计审查合格证书"&":"&ThisWorkbook.Worksheets("能效测评技术文件收集").Range("c13"))

Set Nodx=TreeView1.Nodes.Add("项目立项",tvwChild,,"建筑施工设计文件审查意见书"&":"&ThisWorkbook.Worksheets("能效测评技术文件收集").Range("c14"))

……

MSJ5.8/1.6D型矿山竖井掘进机的凿井工艺可归纳为以下过程：首先采用反井钻机施工导井，导井施工完成后，施工井筒锁口，并安装竖井掘进机和相关辅助设备，利用竖井掘进机进行扩井。竖井掘进机运行过程中，岩渣自导井掉落至下部水平巷道，由下部运输系统装运。竖井掘进机掘进井筒至一定深度后，安装吊盘和保护盘，向下掘进的同时完成井壁支护。竖井掘进机掘进至井筒底部，拆除吊挂系统，利用专用井架将竖井掘进机提出地面，完成井筒施工。

End Sub

(1) 随塔里木荒漠绿洲过渡带胡杨林退化程度加剧，林地土壤容重与非毛管孔隙度、土壤通气度增大，黏粒、粉粒含量与毛管孔隙度降低。土壤质地粗化，持水保土功效减弱，这是系统自身脆弱生态基质受强烈风蚀作用和人类干扰下植被退化共同作用的结果。

3 结论

1）利用VBA可以快速开发能效测评资料收集程序，程序化能效测评技术文件收集阶段。同时创建用户交互界面，方便用户操作。

2）利用TreeView控件可以直观地显示出文件和目录结构、文档中的类层次。

3）利用VBA开发其他资料收集系统是可行的。

[1]民用建筑能效测评标识标准:DB32/T 3964-2020[S].江苏:江苏凤凰科学出版社,2021.

[2]王建玉.基于绿色建筑的能效测评技术体系构建[J].建筑节能,2018,46(12):32-35.

[3]许丹菁,龚红卫,仇峥,高兴欢.建筑能效测评中资料取证[J].能源研究与管理,2013(1):106-110.

[4]Excel Home.别怕，ExcelVBA其实很简单[M].北京:人民邮电出版社,2012.

[5]邱海滨.TreeView控件的设计与应用[D].电子科技大学,2010.