基于VB6.0测量工具箱程序设计

基于VB6.0测量工具箱程序设计

摘 要

基于VB6.0的集成开发环境在测量工作中具有重要意义，是测绘人员必须掌握的一门实用、有效的专业技能。随着测绘技术的不断发展，计算机在现代测绘科学中的应用越来越广泛，已经深入到从理论研究到实际生产的方方面面，如坐标解算、数据处理、施工放样计算、地理信息数据加工和管理等。使用计算机程序处理测量数据，不但方便、快速，而且准确、具有可重复性。它综合性很强，涉及面不仅包括控制测量学、测量平差、工程测量学等测量专业内容，还涉及数据结构、数组与过程、编程技术等多方面内容。编写的程序在测量作业中起到了很大的作用，方便了计算，节约了时间，提高了工作效率并且能够保证计算结果准确可靠。同时，为以后熟练使用卡西欧计算器奠定了基础。

本设计课题将VB语言与测量程序设计进行了有机结合。本论文的主要目的是使我们在学习VB语言编程的同时，能够结合测绘专业的例子，一方面可以巩固测绘专业知识，另一方面可以掌握运用VB语言编写程序解决测绘专业问题的能力。

关键词：VB、导线、程序设计

目 录

摘要

第1章 绪论 ..............................................1 1.1 测量程序设计的出发点 ..............................1 1.2 测量程序设计的重要性 ..............................1 1.3 测量程序设计的过程 ..................................1 第2章 测量程序设计基础 ..................................1 2.1 VB6.0简介...........................................2 2.2 VB6.0的优越性.......................................2 2.3 测量中批量数据的处理................................3 2.4 测量常用基本程序汇编................................9 第3章 测量工具箱的创建思路..............................17 3.1 界面分析及设计步骤.................................17 3.2 主窗体界面及代码...................................18 3.3 注意事项...........................................20 第4章 VB测量程序设计.................................21 4.1 已知三角形三点坐标求内角...........................21 4.2 线路测量实习成绩评定...............................23 4.3 前方交会...........................................24 4.4 测边交会...........................................26

4.5 多测回水平角计算...................................28 4.6 基于VBA的Excel测量程序在工程测量中的运用..........31 第5章 结束语...........................................35 参考文献.................................................36 致 谢.................................................37

第1章 绪论

本章主要介绍为什么要进行测量程序设计以及测量程序设计的重要性，最后说明测量程序设计的过程。

1.1 测量程序设计的出发点

在实际的测量中，有时候要自己进行数据处理，或者是进行必要的计算。如果待处理的数据有上千个甚至更多，例如在诸如工程施工放样、大坝安全监测、地图绘制等测绘工作中，都必然涉及到海量的数据传输、存储、检索、处理等工作这时候仅仅靠手算是不能满足的，所以要利用软件（即程序）进行处理。

1.2 测量程序设计的重要性

如今，能够进行编程的语言很多，例如VB、VF、C++等，通过这些语言编写出来的测量程序简单易用、方便快速、功能强大、应用广泛，适合测量专业人员使用，极大地方便了测量工作者，节约了时间，提高了效率。

从学习角度上讲，VB的简单和可视化、面向对象等特点，也非常适合作为一门语言来学习，所以本论文所编写的程序均采用VB编写。

1.3 测量程序设计的过程

要想进行测量程序设计，一方面，要掌握测量专业知识，比如测量平差基础等；另一方面，要有一定的VB知识，比如数组、过程等。只有这样才能够熟练的编写测量程序。对于测绘专业的学生来说，编写专业相关的程序也是一个深化测量基础知识的过程，当用设计程序来解决一个测量问题时，例如导线计算，必须先弄清楚计算导线的步骤：需要哪些数据，经过哪些检核计算，如何算出最后的导线点坐标等。明确了这些处理步骤以后，再把这些步骤用计算机能够识别的指令编写出来并送入计算机执行，计算机才能按照我们的要求对指定的数据求解。

计算机能执行的指令序列成为程序，而编写程序的过程称为程序设计。由此可知，编写测量程序的过程，也是对测量基础知识复习、巩固和加深的过程。当然，一个程序并不是从最开始就十分契合待解决的实际问题，也不能一成不变，只有通过反复的使用，不断根据实际应用的需要反复改进，才能真正编写出适合实际的测量程序来。

一般来说，利用VB6.0创建测量程序有以下6个主要步骤： （1） 综合分析，建立数学模型。 （2） 创建应用程序界面。 （3） 设置窗体和控件的属性。 （4） 编写代码。

（5） 运行和调试应用程序。 （6） 保存程序。

第二章 测量程序设计基础

本论文中的测量程序是利用VB语言编写出来的，所以要对掌握VB的相关知识并且能够熟练运用，在测量综合程序的编写过程中用到了很多的基本程序，从而构成它们的子程序，为此要编写出基本的测量程序，测量中的数据往往是批量的，所以能够进行批量处理。

本章主要介绍了VB6.0的相关知识、简单的基本程序，例如角度弧度的转化、坐标正反算等，还写出了对测量批量数据处理的相关知识，例如数组、过程等以及批量数据处理FlexGrid控件等知识。

2.1 VB6.0简介

VB是Visual Basic的简称，VB是从BASIC语言发展而来的，是Windows环境下快

速开发应用程序的可视化工具。其中，Visual是指开发图形用户界面的方法，是指直观的编程方法。Basic是指BASIC语言。之所以叫做Visual Basic，就是因为它使用了BASIC语言作为代码。作为程序设计语言，VB的主要特点为： （1）面向对象的可视化设计平台； （2）事件驱动的编程机制； （3）结构化的设计语言； （4）充分利用Windows资源；

（5）具有开放的数据库功能与网络支持。 1991年，微软公司为了简化Windows应用程序的开发过程，推出了Visual Basic 1.0版，它极大的改变了人们对Windows的看法，以及使用Windows的方式。1992年、1993年两年间，在Visual Basic1.0的基础上又相继推出了Visual Basic 2.0版和Visual Basic 3.0版。1995年，随着Windows 95轰轰烈烈的发布，Visual Basic 4.0版也随之问世。1997年，微软公司推出了Visual Basic 5.0版。1998年推出了Visual Basic 6.0版。微软公司在推出英文版的同时，也推出了中文版，从而大大的方便了中国用户。Visual Basic的最新版本是2006年发布的Visual Studio 2005套件中的Visual Basic 2005。但是由于Visual Basic 2005对运行环境要求较严格，所以目前使用者较少。 现在拥有最多用户的Visual Basic版本依然是Visual Basic 6.0，它包括三种版本：学习班、专业版和企业版。三种版本适合于不同的用户层次。 Visual Basic 6.0是专门为Windows 9x/NT/2000等32位操作系统设计的。用Visual Basic 6.0的编译器可以自动生成32位应用程序，可脱离Visual Basic 6.0的运行环境，且运行速度更快、更安全，适合在多任务环境下运行。

2.2 VB6.0的优越性

目前使用较多的编程语言有Visual Basic、Visual FoxPro等，它们各有特点，分别适合不同的领域。从学习角度上讲，VB的简单和可视化、面向对象等特点，也非常适合作为一门语言来学习。作为高质量的开发软件，VB6.0具有以下显著的优点：

2.2.1 简单易学

Visual Basic在继承了BASIC语言简单易用的基础上，改造了BASIC语言中复杂冗长且极易出错的“面条式”结构，而是以接近于人类自然语言和逻辑思维方式的结构化程序设计语言取代之，使其更加流畅、自然。用VB编写程序代码，如同用英文跟计算机交代工作任务一样。VB的编程器支持彩色代码，还可以自动进行语言检查，同时具有强大且使用灵活的调试器和编译器，这些都使得VB程序设计从学习到使用都非常简单方便。

2.2.2 面向对象的可视化程序设计

面向对象的程序设计是当代程序设计的主流，既符合人们的思维和解决问题的逻辑，又是开发大型程序的必须。这里，“对象”是一个比较抽象的概念，可以理解成封装了一些代码和数据的集合，能够完成一定的动作和功能。

VB中的对象主要分为窗体和控件两类。窗体是用户工作区，所有控件都在窗体中集成，从而构成应用程序的界面；控件是指“空的对象”或基本对象，是应用程序的图形用户界面的一个组件，对其属性可以进行不同的设置，从而构成不同的对象。

VB这种可视化的用户界面设计功能，把程序设计人员从繁琐复杂的界面设计中解脱出来。可视化编程环境的“所见即所得”功能，使界面设计如同积木游戏一样，从而使我们感觉到编程也是一种享受。 2.2.3 事件驱动的编程机制

事件驱动机制是VB区别于其他高级语言的显著特点。VB没有明显的主程序概念，程序员要做的就是面向不同的对象分别编写它们的事件过程。

事件驱动应用程序的典型事件序列如下： ①启动应用程序，加载和显示窗体。 ②窗体和控件接受事件。

③如果在相应的事件过程中存在代码，则执行代码。 ④然后，应用程序等待下一次事件。 2.2.4 高度的可扩充性

VB为用户提供的扩充途径包括：

①支持第三方软件商为其开发的可视化控件对象； ②支持访问动态链接库DLL； ③支持访问应用程序接口API。 2.2.5 广泛支持的二次开发能力

VB与Microsoft系列软件天然的结合，使得编程变得非常容易。在Word文档上增加一些实现简单功能的按钮和滚动条；在Excel表格的基础上进一步开发适合自己应用的表格程序等，都非常方便快捷。而且众多测绘专业软件都支持VBA，使得VB也成为专业人士进行二次开发的很好选择。例如AutoCAD可以用VBA实现有关的界面和功能。 2.2.6 强大的数据库访问能力

VB中提供了强大的数据库管理和存取操作能力。利用数据控件和数据库管理窗口，能直接编辑和访问Access，FoxPro等，通过访问或建立连接的方式使用并操作后台大型网络数据库，如SQL Server,Oracle等 。VB6.0还具有功能强大、使用方便的ADO技术，支持所有的OLE DB数据库厂商。

2.3 测量中批量数据的处理

在测量中，测量数据往往都是大量的数据同时处理，例如一个水准网就有几十个点，需要列很多方程进行平差，很难想象使用一个一个的简单变量和一条一条的简单语句来

处理这些数据。

本节将介绍批量数据处理的几个工具：循环、数组和过程。数组可以存储批量的数据，而循环则可以重复多次执行某些语句，过程则进一步将某些程序封装起来以便于重用。另外本章还将介绍批量数据处理控件等。 2.3.1 循环结构

编写程序时经常需要对某条或某些语句重复执行多次，这可以利用各种循环结构来实现。VB中提供了两种类型的循环语句，即计数型循环语句和条件型循环语句。For循环是计数型循环语句，而While循环和Do循环语句属于条件型循环语句。 2.3.1.1 For循环

For循环用于实现循环次数已知的循环结构，程序按照此种结构中指明的循环次数来执行循环体部分。For循环格式如下：

For循环变量=初始值To终值［Step步长］ ［循环体］ ［Exit For］ ［循环体］

Next循环变量

2.3.1.2 Do循环和While循环

Do循环和While循环都属于条件循环结构，它们都是通过判断一个条件的成立与否来决定是执行循环体语句还是结束循环。它们与For循环最大的差别在于：For循环用于循环次数已知的情况，执行一定次数后即可结束循环；而Do循环和While循环用于不知道循环次数的情况。 （1） While循环

While循环比较简单，其格式如下： While条件

［循环体］ Wend

与前面的For循环比较可以看出，For语句的格式比较紧凑，表达丰富；但是While语句比较简单灵活、易于理解，对于有一个判断条件、循环次数未知的循环尤其适用。 （2） Do循环

Do循环也是根据某个条件是否成立来决定能否执行相应的循环体部分，与While循环不同的是，Do循环有两种格式，既可以在初始位置检验条件是否成立，也可以在执行一遍循环体后的结束位置判断条件是否成立，能否进入下一次循环。

Do循环的两种格式如下： （1） 格式一： Do

［语句体］

［满足某条件时］

Exit Do ［语句体］

Loop［While和Until条件］ （2） 格式二

Do［While和Until条件］ ［语句体］

［满足某条件时］

本文来源：https://www.bwwdw.com/article/g825.html