利用vb6.0编制平面数学精度检查软件.docVIP

利用VB6.0编制平面数学精度检查软件 范学东 浙江省测绘大队，310030 摘要： 本文介绍用VB6.0编译出来的主要针对在外业测量检查过程中，经常需要进行数学精度的统计的一个自动化程序，该程序操作简单、使用方便，具有较高的实用价值，可大大提高工作效率，增进产出。网http://www.othermap.co 关键词： VB6.0 数学精度 AUTOCAD DXF 一、引言 各种地形、地籍项目的测量部分，都需进行数学精度的统计，来评定产品的质量。本文介绍使用VB6.0开发自动化精度检查工作，以减少一些繁琐而重复的工作。 VB6.0是基于Windows下的一种开发软件，具有易学、易懂、速度快等特点，比较适合业余程序员进行小型软件的开发。 二、DXF文件格式介绍 现在应用比较广泛的测绘软件南方CASS系列。CASS系列软件在AUTOCAD的基础上利用Object-Arx二次开发而成，Arx本质为Windws的动态链接库(Dll文件)，功能强大，本文不在详细介绍。DXF 是Autodesk公司开发的用于AutoCAD与其它软件之间进行CAD数据交换的CAD数据文件格式。DXF是一种开放的矢量数据格式，可以分为两类：ASCII格式和二进制格式；ASCII具有可读性好，但占有空间较大；二进制格式占有空间小、读取速度快。由于Autocad现在是最流行的cad系统，DXF也被广泛使用，成为事实上的标准。绝大多数CAD系统都能读入或输出DXF文件DXF文件是由很多的“代码”和“值”组成的“数据对”构造而成，这里的代码称为“组码”（group code），指定其后的值的类型和用途。每个组码和值必须为单独的一行的。DXF文件被组织成为多个“段”（section），每个段以组码“0”和字符串“SECTION”开头，紧接着是组码“2”和表示段名的字符串（如HEADER）。段的中间，可以使用组码和值定义段中的元素。段的结尾使用组码“0”和字符串“ENDSEC”来定义。ASCII 格式的 DXF 可以用文本编辑器进行查看。DXF 文件的基本组成如下所示HEADER 部分 - 图的总体信息。每个参数都有一个变量名和相应的值。CLASSES 部分 - 包括应用程序定义的类的信息，这些实例将显示在 BLOCKS、ENTITIES 以及OBJECTS 部分。通常不包括用于充分用于与其它应用程序交互的信息。TABLES 部分 - 这部分包括命名条目的定义。Application ID (APPID) 表Block Recod (BLOCK_RECORD) 表Dimension Style (DIMSTYPE) 表Layer (LAYER) 表Linetype (LTYPE) 表Text style (STYLE) 表User Coordinate System (UCS) 表View (VIEW)表Viewport configuration (VPORT) 表BLOCKS 部分- 这部分包括 Block Definition 实体用于定义每个 Block 的组成。ENTITIES 部分 - 这部分是绘图实体，包括 Block References 在内。OBJECTS 部分 -- 包括非图形对象的数据，供 AutoLISP 以及 ObjectARX 应用程序所使用。THUMBNAILIMAGE 部分 -- 包括 DXF 文件的预览图。END OF FILE 三、软件开发思路 本程序主要是自动化检查平面数学精度，首先将图形文件的居民地层单独提取出（单独提取居民地层是为了减少计算量，应为实际作业中主要检查居民地房角点），转成DXF文件格式，这样可由程序直接读取数据。再和检查数据进行匹配计算，自动生成计算结果，如粗差个数，检查点数，中误差值等指标。 四、VB程序编制 打开VB6.0，添加企业版控件。程序界面设计如图。 程序提供二种方式，一种以检查文件直接匹配计算，另外在图上逐一取点的方式。本文以检查文件直接匹配计算为例说明。 打开检查数据（DAT文件）和经处理后的DXF文件，其中检查文件中编码“H”代表高程点，编码“f”代表房角点。 技术结果如下，计算结果可根据需要生成文本报告，或直接以表格格式打印： 程序主要代码如下： VB直接连接AutoCAD Public Sub AutoCADConnect() 连接AutoCAD On Error Resume Next Set obj_Acad = GetObject(, autocad.application) If Err Then Err.Clear On Error Resume Next Set obj_Acad = CreateObject(autocad.app