贾丙普，彭喜林

（中国水电顾问集团中南勘测设计研究院有限公司，湖南 长沙410014）

DNA03是徕卡公司新一代数字水准仪，中文界面，操作更容易，速度更快，超大显示屏，显示的内容更丰富，测量精度达到0．3 mm／k m。

DNA03仪器默认数据输出格式为GSI格式，可读性较差，并且不能满足电子手簿打印格式要求。在亭子口水利枢纽工程二等水准测量工程中，利用LEICA Geo Office软件提供的“格式管理器”自己定制数据输出格式，并结合EXECL表格中的VBA宏命令输出规定格式的水准记录手簿。

1 仪器输出数据

1．1 输出内容

水准测量输出数据格式应内容齐全、结构清晰，并满足现行规范要求，需输出作业名称、作业时间、线路名称、作业方法、测站前后视中丝读数、前后视距离、线路总站数、累计视距差、累计距离、累计高差等观测数据。

1．2 输出格式定制

定制DNA03水准数据输出格式首先使用格式管理器在计算机上进行。格式管理器是LEICA Geo Office软件中的一个模块，软件启动新建文件，类型选“DNA＿Standar d”，启动后界面见图1。

图1 格式管理器

格式文件变量输出设置宜先在菜单 “选项”—“设置”中设长度单位为“Meter”，“选项”—“默认格式化”中设置对齐方式、长度、精度等，并选择应用到每个新格式，以保证输出数据整齐、美观。

主要导出格式串如下：

Job项：导出作业名称，作业年、月、日等，编辑区中代码如下：

Job Name，Date（Long year 2003），Date（Month），Date（day）

Lines项：导出线路名称、测量方法等，编辑区中代码如下：

Line Name，Met hod

Measurement All项：导出测站全部读数，前后视中丝读数、距离等，编辑区中代码如下：

Point ID，┌Staff Reading，┌Distance，┌d Ht（＋），┌d Ht

Station Results项：导出测站结果，包括测站高差、累计视距差、累计距离，编辑区中代码如下：

d Ht，┌Distance（Balance），┌┌Distance（Station）

Line Results项：导出线路结果，为便于后续处理和阅读，前3行为说明文字和分隔符号，编辑区中代码如下：

线路结果

＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝

线路总站数：累计距离：累计视距差：总高差：

nu mber of stations，┌┌distances（Total），┌distances（Balance），┌d Ht（Total）

1．3 数据输出

定制完成后保存为 TZK．frt文件，连接DNA03水准仪，采用LEICA Geo Office软件中的“数据交换管理”将该文件上传至仪器的格式文件组位置。

在传输作业数据时选择自定义格式中的“TZK．frt”，生成 ASCII码文本文件，一般命名为Job．asc（作业名称加．asc）。

2 EXCEL表格后续处理

2．1 表格模板

首先在EXCEL中新建文件，并将Sheet1表重命名为“模板”，在表中设置好电子水准测量记录手簿标题格式，其下部观测数据由宏命令生成。将Sheet2表重命名为“数据”。

2．2 VBA宏编辑

Visual Basic f or Applications（VBA）是 Microsoft Office软件附带的一种Visual Basic宏语言，主要用来扩展Office的应用程式功能。

利用VBA实现从文本文件Job．asc到EXCEL工作簿的转换，每条水准线路生成一个EXCEL工作表，观测数据全部整理到一个工作簿中。

VBA设计思路如下：读入作业文件到工作表“数据”中，复制“模板”工作表，并重新以线路名为名称，写观测数据；一条线路完成后，重复复制、命名、写数据等工作；继续下一条线路，直至本作业的所有线路完成。程序流程如图2所示。

图2 数据转换流程

VBA部分代码如下：

Sub导入文本文件（）

Di m f d As String

f d＝ Application．Get Open Filename（FileFilter：＝"ASC文件（＊．asc），＊．asc"，Title：＝"请选择水准ASC文件"）

With ActiveSheet．Query Tables．Add（Connection：＝"TEXT；" ＆f d，Destination：＝Range（"A1"））

．Text File Ot her Deli miter＝ "，" "分隔符可自己定义

．Text File Col u mn Data Types＝ Array（1，1，1，1，1，1）

．Refresh Background Query：＝False

End With

Application．Run"mysu m" "运行子程序mysu m写观测数据

End Sub

在“数据”工作表中新建一文本框“水准转换”，右键单击该文本框，单击快捷菜单中的“指定宏”进行设置，将导入文本文件宏指定给该文本框。然后将EXCEL文件另存为模板文件“徕卡水准．xlt”备用。

2．3 数据处理

利用模板“徕卡水准．xlt”新建文件EXCEL并启用宏，点击“水准转换”运行宏命令，按提示打开作业文件进行转换即可。

3 应用实例

在亭子口水利枢纽首级施工控制网二等水准测量过程中，使用本方法进行DNA03数据处理。全部测段数据统一存储于一个EXCEL文件中，输出数据内容齐全、结构清晰、样式美观、节约纸张。一个只有4个测站的线路输出记录手簿如图3所示。

图3 水准测量记录手簿

4 结束语

徕卡DNA03数字水准仪读数客观、精度高、速度快，能够减轻作业强度，测量结果便于输入计算机，容易实现水准测量内外业一体化，现已广泛应用于各等级水准测量中。但也存在数据输出格式与我国现行水准测量规范不一致、不易读等缺陷，利用本文提出的方法可较好地解决这一问题。在亭子口水利枢纽工程二等水准测量中，利用“格式管理器”和VBA实现了DNA观测数据到规定格式水准手簿的快速转换，提高工作质量和效率。

［1］ 岳龙．数字水准仪的基本测量原理与使用［J］．测绘与空间地理信息，2014，37（4）：190－191．

［2］ 王亚琳．浅谈电子水准仪的特点及注意事项［J］．测绘与空间地理信息，2014，37（4）：214－215．

［3］ 袁峥．LEICA DNA数字水准仪测量数据输出格式研究［J］．大坝与安全，2009（S1）：70－71，75．

［4］ 邹进贵，余 锐，纪志刚．DINI03数字水准仪内存记录数据转换方法研究［J］．测绘地理信息，2013（8）：16－17，23．

［5］ 邝良寒，胡华兴．电子水准仪数据处理系统［J］．湖南水利水电，2012（1）：36－37，41．

［6］ 包民先，殷忠．Di Ni12数字水准仪进行基坑监测的技术指标探讨及应用［J］．测绘工程，2011，20（6）：57－60．

［7］ 付江缺，高万柱，裴良臣．水准网自动处理模型及程序实现［J］．测绘工程，2013，22（5）：69－70，74．

［8］ 汪平，孙雪洁，许家琨，等．基于Visual Basic实现徕卡DNA03电子水准仪数据处理［J］．海洋测绘，2013（6）：56－58．

［9］ 易天阳，王双洪．Di Ni03电子水准仪的数据格式转换程序设计及实现 ［J］．测绘与空间地理信息，2013（11）：205－207．

［10］陈小歌，余代俊，毛川．弱光线对数字水准仪测量的影响分析［J］．测绘工程，2014，23（2）：64－65．

［11］熊指南．国产数字水准仪温度性能测试与研究［J］．测绘工程，2014，23（7）：72－75．