VB在测量数据处理中的应用

聂佳妮

摘要 本文主要探讨利用VB编制程序处理数据，方便数据交换和生成一些数据成果

关键词 VB程序设计 文件类型数据格式

中图分类号：S611文献标识码：A 文章编号：

一、引言

随着计算机程序设计语言的不断发展， 面向对象编程是当今程序设计的一个趋势，VB语言是一种简单易学的面向对象编程语言，本人运用它编制一些程序, 通过改变文件类型或数据格式等方式,对测量中些数据进行处理，达到转换成我们需要数据的目的，方便我们的测量工作。

我单位现在拥有Leica GPS530卫星定位系统，全站仪以及清华山维绘图及线路软件等，在工程测量中，通常需要将不同设备和软件中的数据进行相互转换，成为我们所需要的文件类型或数据格式，同时为了工作方便，还要对不同数据进行编辑修改。如将GPS-RTK动态测量的点转入电子平板或线路软件，利用全站仪内存记录的测量点传入绘图软件等，以及在线路测量工作中将线路软件中输出的中线成果编制成中线成果表，在CAD中如何实现高程系统加减常数等问题，都可以通过VB编制一些小程序，实现数据处理的目的。

现就以下几例结合我单位的设备及工程实例，运用编制的程序处理数据，谈谈在实际中工作的体会。

二、全站仪外业数据存入内存，内业数据处理

1、 现势性

在野外测量工作中，通常是全站仪测量数据，同时传输到绘图软件中，这样可现场成图，但是需要笔记本等设备。有时，外业作业条件恶劣，或是笔记本等设备不能工作时，可将外业测量数据传输到仪器内存。这样，可尽可能的缩短外业的作业时间，也可克服设备不足的弱点。现在各种不同的绘图软件也应用于工作中，文件中，有记录操作步骤的文件，因此，有必要将全站仪内存中的数据格式转换成绘图软件中的文件的数据格式，实现数据交换，然后利用绘图软件编辑处理，完成图形。现以全站仪TC307和清华山维EPSW98绘图软件为例说明。

2、 数据处理过程

将全站仪中数据传输到清华山维的软件中

1） 在全站仪中建工作，设置工作项目，将测量数据传输到内存中

2） 利用与仪器配套的数据传输软件，将数据*.gsi格式文件下载到计算机中，传输过程中注意数据格式，通常传输测量点的水平角、垂直角（天顶距）、斜距、仪器高等

3） 将数据传输到绘图软件中

（1）文件类型转换

全站仪TC307的数据格式数GSI 8位格式，文件类型为*.gsi类型，我单位采用的是清华山维EPSW98软件，记录操作步骤的数据格式文件类型为*.fld类型。在绘图过程中，只要对*.fld数据文件进行重算，就可将野外地形点坐标录入到软件中。因此，要对文件的类型进行转换。

（2）数据格式转换

在数据处理过程中，不仅要对文件类型进行转换，还要对文件中的数据格式进行转换。*.gsi文件数据的格式为

“110001+00000001 21.004+32519230 22.004+08919130 31...0+00002960 51....+0007+000 87...0+00001500 88....+00000000”,需转换成*.fld文件数据的格式，格式为：“00:001::201:325.1923:89.1913:2.96:1.5:1:1:1:1:1:::”。

（3）在绘图软件中对数据重算，对图形进行编辑，成图。

4） 程序编制原理

（1）利用VB程序设计语言，设计界面，如图一

（图一）

（2）打开文件

用于输出文件：open file for input as#1

定义输入文件：Open file2 For Output As #2

（3）从*.GSI格式文件中读出数据并转换数据格格式。

outline(1) = Mid$(s1, 13, 3)

outline(3) = Val(Mid$(s1, 24, 8)) / 100000

outline(4) = Val(Mid$(s1, 40, 8)) / 100000

outline(5) = Val(Mid$(s1, 56, 8)) / 1000

在变量中设设置格式进行转换。

（4）利用format( )函数进行格式定制。如：

outstr = "00:" & outline(1) & "::" & outline(2) & ":" & outline(3) & ":" & outline(4) & ":" & outline(5) & ":" & outline(6) & ":1:1:1:1:1:::"

（5）将转换格式后的变量输出到文件如下：

Print #2, outstr

3、 源程序略

三、将GPS-RTK动态测量数据转换成EPSW98中的*.FLD或*.KNW文件。

1、 现势性

在工程测量中，如线路测量，随着GPS技术的广泛应用，运用GPS-RTK动态测量方法，可快速测量线路转点坐标，数据量较大；同时，也可将GPS-RTK动态测量方法应用于测量线路中一些地势较平坦、障碍物少的地区进行测图，采集的数据量较大，而我单位绘图采用的EPSW98或EPSCUT线路绘图软件，因此有必要编制程序将GPS-RTK动态测量方法采集的数据转换成*.FLD或*.KNW文件格式。在线路测图软件中生成中线，或编辑图形绘图。

2、 数据处理过程

1） GPS-RTK动态测量方法采集数据。

采用GPD-RTK动态测量方法，外业采集数据，通常分以下两种情况，一是线路测量中，应用RTK方法测量线路转点坐标（或穿越放大地方坐标），快速完成线路中线转点的测量，这种作业方法比传通全站仪导线测量方法节省人力、物力，速度快、精度高；二是应用RTK方法测量地势平坦、范围较大的地区的地形图，由于测量速度快（1秒测一个历元），可快速采集数据。但是，需要将RTK方法所采集的数据转换成EPSW98所认可的数据格式，也就是将*.txt或*.csv文件格式转换为*.fld或*.knw文件格式。

2） 数据处理。

RTK测量方法成果文件类型为*.txt或*.csv，格式为：“点名，代码，X坐标，Y坐标，H高程”；EPSW98中的*.fld或*.knw类型文件，其中*.knw格式为“点名 编码 X坐标 Y坐标 H高程 1”，*.fld文件格式为：“07:点名::编码:X坐标:Y坐标:高程:1:0:1:1::::”。运用自编制的程序可完成数据转换。

3） 在清华山维绘图软件EPSW98中录入数据，生成图形。

在清华山维绘图软件EPSW98中，通过“控制点录入可录入”可将*.knw文件录入到软件中，通过一步测量重算方法可将*.fld格式文件录入EPSW98软件中。再进行图形编辑，完成绘图或生成中线。

3、 程序编制原理。

1） 图形界面（如图二）及控件。

我们通常应用VB程序语言完成程序设计，界面中包含控件如下：文本控件、卷标控件、公用对话框、按钮控件等。

（图二）

2） 文件格式转换。

应用公用对话框控件中的filter属性可设置文件的输入输出格式，完成程序中的文件格式转换。例如：需打开文件类型“CommonDialog1.Filter = "文本文件(*.txt,*.csv)|*.txt”，转换后的文件类型为“CommonDialog1.Filter = "FLD 文件(*.FLD)|*.FLD|所有文件(*.*)|*.*"”。