21Excel VBA程序开发在理正勘察软件中的应用.docVIP

PAGE PAGE 1 21ExcelVBA程序开发在理正勘察软件中的应用 　　摘要：理正勘察软件是针对勘察设计的一款实用工具，将勘察数据录入，生成成果表格、成果图、室内试验成果曲线及原位试验成果图，并分析评价，最终形成勘察报告。我个人在使用时为加快勘察数据录入，用ExcelVBA编写一个小程序生成理正接口文件。 　　关键字：勘察ExcelVBA接口 　　Abstract:Lizhengsurveysoftwareisdesignedforsurveyanddesignofapracticaltool,thesurveydataentry,generatingresultstable,graph,theresultsoflaboratorytestsandin-situtestresultsofcurvegraph,andanalysisandevaluation,eventuallyformedtheinvestigationreport.Ipersonallywhenusedtospeeduptheinvestigationdataentry,usingExcelVBAtowriteasmallprogramtogenerateLizhenginterfacefile. 　　Keywords:survey;ExcelVBA;interface 　　中图分类号：U469.6+92文献标识码：A文章编号： 　　理正勘察软件是一款不错的勘察软件，把很多计算统计转为计算机自动进行，还能生成图形，方便、快捷、准确。但本人在软件使用时，勘察数据（钻孔数据、土层数据、标贯数据、动力触探数据、水位数据）这些数据都要是单独在本数据表中进行录入的，有没有一个方法把这些数据在一个界面内输入，一次都输入软件中呢，这样增加录入的速度，也减轻工作压力。理正勘察试验软件可以把室内试验的结果生成一个理正接口文件，在导入时一次将一个钻孔的试验数据或是多个钻孔的试验数据导入到数据库中，这是怎么实现的呢？勘察数据可不可以生成一个接口文件，再导入数据库中呢？经过对这款软件的研究，发现可以实现这个想法。 　　一、理正勘察软件接口文件 　　理正勘察软件有一种导入数据的方式，就是导入接口文件。接口文件为计算机常用的两种设备或是两种软件因不同的数据格式而转成统一相互识别的一个文件，通过这个文件实现数据传输。 　　接口文件一般为纯文本文件，各行尾以回车换行码（ASCII码13和10）或换行码（ASCII10）分隔均可，可用种文本编辑编写或通过应用程序生成。在文件中有注释行，以特殊符号置于行首，系统读入文件时忽略注释行及空行。文件中还要有分隔符，每行中各个项目之间存放分隔附。 　　想做理正勘察软件的接口文件就得找出和理正相符的格式要求，比如注释行的符号及分隔附号，还有就是具体数据的行列位置等等。找到这个单从理正勘察试验接口文件中只能找出注释行符及分隔符，对于钻孔数据、土层数据等数据项无法查到。在理正软件的帮助文件中也没有相关提示。我在软件安装文件夹中仔细查找时发现一个文本文件，理正标准数据接口.txt，通过这个文件我了解到了理正勘察接口文件的所有格式： 　　;勘察阶段建设单位设计单位勘察单位施工单位工程地点工程参考原点坐标X工程参考原点坐标X工程标高(m)起始里程（m）结束里程（m）桥中心点段号桥中心点里程桥式类型桥名坐标系统Y轴为水平方向（默认X轴为水平方向）(0-XY1-YX)指北针与Y轴的夹角（度）底图比例尺工程执行标准(0-工勘1-铁路2-公路3-水利)开工日期完工日期 　　#GC#GCKCJDGCJSDWGCSJDWGCKCDWGCSGDWGCDDGCXGCYGCBGGCQSLCGCJSLCGCZXDHGCZXLCGCZXLXGCZXSMGCYXGCZBZGCBLCGCBZKGRQWGRQ 　　;1钻孔数据 　　;*钻孔编号勘探点类型X坐标Y坐标偏移量孔口标高水面标高勘探深度探井深度钻孔直径勘探开始日期勘探结束日期 　　#ZK#ZKBHZKLXZKXZKYZKPILZKBGZKHSBGZKSDZKTJSDZKZJZKKSRQZKZZRQ 　　;2土层数据 　　;*岩土名称*层底深度地层厚度主层编号亚层编号次亚层编号地质时代地质成因颜色密实度湿度可塑性浑圆度均匀性风化程度岩层倾向岩层倾角矿物成分结构构造包含物气味描述完整程度坚硬程度破碎程度节理发育节理间距 　　#TC#TCMCTCCDSDTCHDTCZCBHTCYCBHTCCYCBHTCDZSDTCDZCYTCYSTCMSDTCSIDTCKSXTCHYDTCJYXTCFHCDTCYSQXTCYSQJTCKWCFTCJGGZTCBHWTCQWTCMSTCZTXTCJYCDTCPLTCJLFYTCJLJJ