摘要：理正勘察软件是针对勘察设计的一款实用工具，将勘察数据录入，生成成果表格、成果图、室内试验成果曲线及原位试验成果图，并分析评价，最终形成勘察报告。我个人在使用时为加快勘察数据录入，用Excel VBA编写一个小程序生成理正接口文件。
关键字：勘察,Excel VBA,接口
理正勘察软件是一款不错的勘察软件，把很多计算统计转为计算机自动进行，还能生成图形，方便、快捷、准确。但本人在软件使用时，勘察数据(钻孔数据、土层数据、标贯数据、动力触探数据、水位数据)这些数据都要是单独在本数据表中进行录入的，有没有一个方法把这些数据在一个界面内输入，一次都输入软件中呢，这样增加录入的速度，也减轻工作压力。理正勘察试验软件可以把室内试验的结果生成一个理正接口文件，在导入时一次将一个钻孔的试验数据或是多个钻孔的试验数据导入到数据库中，这是怎么实现的呢?勘察数据可不可以生成一个接口文件，再导入数据库中呢?经过对这款软件的研究，发现可以实现这个想法。
一、理正勘察软件接口文件
理正勘察软件有一种导入数据的方式，就是导入接口文件。接口文件为计算机常用的两种设备或是两种软件因不同的数据格式而转成统一相互识别的一个文件，通过这个文件实现数据传输。
接口文件一般为纯文本文件，各行尾以回车换行码(ASCII码13和10)或换行码(ASCII10)分隔均可，可用种文本编辑编写或通过应用程序生成。在文件中有注释行，以特殊符号置于行首，系统读入文件时忽略注释行及空行。文件中还要有分隔符，每行中各个项目之间存放分隔附。
想做理正勘察软件的接口文件就得找出和理正相符的格式要求，比如注释行的符号及分隔附号，还有就是具体数据的行列位置等等。找到这个单从理正勘察试验接口文件中只能找出注释行符及分隔符，对于钻孔数据、土层数据等数据项无法查到。在理正软件的帮助文件中也没有相关提示。我在软件安装文件夹中仔细查找时发现一个文本文件，理正标准数据接口.txt，通过这个文件我了解到了理正勘察接口文件的所有格式：
勘察阶段 建设单位 设计单位 勘察单位 施工单位 工程地点 工程参考原点坐标X 工程参考原点坐标X 工程标高(m) 起始里程(m) 结束里程(m) 桥中心点段号 桥中心点里程 桥式类型 桥名 坐标系统Y轴为水平方向(默认X轴为水平方向)(0-XY 1-YX) 指北针与Y轴的夹角(度) 底图比例尺 工程执行标准(0-工勘 1-铁路 2-公路 3-水利) 开工日期 完工日期
#GC#GCKCJD GCJSDW GCSJDW GCKCDW GCSGDW GCDD GCX GCY GCBG GCQSLC GCJSLC GCZXDH GCZXLC GCZXLX GCZXSM GCYX GCZBZ GCBLC GCBZ KGRQ WGRQ
1钻孔数据
*钻孔编号 勘探点类型 X坐标 Y坐标 偏移量 孔口标高 水面标高 勘探深度 探井深度 钻孔直径 勘探开始日期 勘探结束日期
#ZK#ZKBH ZKLX ZKX ZKY ZKPIL ZKBG ZKHSBG ZKSD ZKTJSD ZKZJ ZKKSRQ ZKZZRQ
2土层数据
*岩土名称 *层底深度 地层厚度 主层编号 亚层编号 次亚层编号 地质时代 地质成因 颜色 密实度 湿度 可塑性 浑圆度 均匀性 风化程度 岩层倾向 岩层倾角 矿物成分 结构构造 包含物 气味 描述 完整程度 坚硬程度 破碎程度 节理发育 节理间距
#TC#TCMC TCCDSD TCHD TCZCBH TCYCBH TCCYCBH TCDZSD TCDZCY TCYS TCMSD TCSID TCKSX TCHYD TCJYX TCFHCD TCYSQX TCYSQJ TCKWCF TCJGGZ TCBHW TCQW TCMS TCZTX TCJYCD TCPL TCJLFY TCJLJJ
3标贯数据
*试验点的底深度(m) 标贯类型 特征值 杆长(m) 一阵击数的长度(m) 一阵击数 标贯击数 标贯修正系数(中间结果) 修正后的标贯击数 修正否 参与否
#BG#BGDSD BGLX BGTZZ BGGC BGYZCD BGYZJS BGJS BGXS BGXZJS BGSXZ CY
4动图触探数据
*试验点的底深度(m) *动探类型(1 2 3) 杆长(m) 试验段长度(m) 一阵击数 贯入度 动探击数 修正后击数 修正否 参与否
#DT#DTDSD DTLX DTGC DTCD DTYZJS DTGRD DTJS DTXZJS DTXZ CY
5水位数据
*水位深度(m) *地下水类型(0-初见水位 1-稳定水位) 地下水位层号(Num) 测水日期 地下水温 水位范围 地下水性质(1-上层滞水 2-潜水 3-承压水 4-其它) 参与否
#SW#SWSD SWLX SWCH SWCSRQ SWDXSW SWFW SWXZ CY
二、生成接口文件方法
生成接口文件就是按接口文件的格式，将勘察数据存储在接口文件内。做接口文件直接用文本编辑软件来编写是不行的，添加的字母很多，比如在钻孔数据前要加上#ZK#，在土层前要加上#TC#等等，手工录入十分困难。而且每一数据的数值个数还不同，钻孔共有12个数据，每一土层共有27个数据，水位数据有8个数据。还要保证每个数据值的个数与接口文件要求一至，不然就不能正确导入理正软件。
首先想到的就是Office家族中的Excel。用Excel直接编辑，然后保存成文本文件格式。用Excel编辑倒是很好，可以自动添加字母，输入是很快。如何保证每行所对应有类型的数据个数与接口文件要求一至，保证每行的数据个数不同，在Excel表格内可以实现但在保存为文本文件后却无法实现。我又想到Excel的外接程序VBA，想通过VBA来实控制每行的列数与接口文件格式一致，然后再保存成接口文件。
三、生成接口文件程序
建立sheet1表为输入表格，建立钻孔数据、土层数据、标贯数据、动力触探数、水位数据输入栏。每个输入栏建立常用数据输入位置就可以，其余为空的数据在转换表格中做以调整。
再建立sheet2为转换成接口文件类型数据。通过转换表格将接口文件中的一些特定代码字母自动添加。再把接口文件每行的数据按接口文件格式要求编制完善。
转换完格式后就要转存成接口文件了，在VBA中添加一模块，编辑生成文件及删除数据的小程序，然后通过按钮来指定运行。
生成文件如下：
在制作完这个最简单的程序后，做到了在勘察工程数据输入时，从一个工作面就可输入钻孔数据、土层数据、标贯数据、动力触探数据、水位数据等多方面的数据，达到了预想的效果，减少了输入数据的工作时间，增加了实际工作效率，使勘察数据更准确。
参考文献：
[1]中华人民共和国行业标准.岩土工程勘察规范(GB50021-2001).[M]北京中国建筑工业出版社，2002.
[2](日)日花弘子编著.Excel函数与公式辞典[M].中国青年出版社,2007.
[3]Excel Home编著. Excel VBA实战技巧精粹[M].北京.人民邮电出版社,2013.
[4]沈洪.施明利.朱军.谭浩强编著 VB程序设计[M].北京.清华大学出版社,2010.