纵横断面计算和检查方法改进

《纵横断面计算和检查方法改进》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、纵横断面计算和检查方法改进　　摘要：由于目前在进行纵横断面计算及检查的常用方法上面存在一些缺陷，使工作的质量和效率受到影响，需要进行改进。而本文正是针对这些缺陷，使用ExcelVBA对这些缺陷进行有效的处理，从而减少在纵横断面计算中出现的错误，加强检查效果。关键词：测绘工程纵横断面ExcelVBAAbstract:Becauseoftheexistenceofsomedefectsintheabovemethodsofcrosssectioncalculationandcheck,itmakestheworkqualityande

2、fficiencyisaffected,andneedtobeimproved.Thispaperisaimedatthesedefects,theuseofExcelVBAtodealeffectivelywiththesedefects,therebyreducingappearinthecrosssectionoftheerrorinthecalculation,tostrengthentheinspectioneffect.Keywords:surveyingandmappingengineering;crosssecti

3、on;ExcelVBA中图分类号：J935文献标识码：A文章编号：概述8目前为了外业纵横断面数据采集时方便快捷，采集的数据格式同设计一般要求的纬地格式不同，以下为两种横断数据格式：外业采集数据格式：桩号零点高程左侧断面点个数距零点距离高程距零点距离高程……右侧断面点个数距零点距离高程距零点距离高程……纬地数据格式：桩号左侧断面点个数距零点距离与零点高差距前一断面点距离与前一断面点高差距前一断面点距离与前一断面点高差……右侧断面点个数距零点距离与零点高差距前一断面点距离与前一断面点高差距前一断面点距离与前一断面点高差……而对纵断面来

4、说，两种格式相同，只不过外业采集时，纵横断面产生在同一个文件中，而纬地格式需要单独的纵断面文件，其格式为：桩号零点高程桩号零点高程……8对于两种数据格式就需要进行数据转换。由于原始数据采集时数据是记录在记录表中的，需要将记录表中的数据录入到计算机中，再转换为纬地格式，在此过程中就有可能产生录入错误，需要对原始记录数据和录入数据进行校对、检核。而常规的人工检查方法费时，费力，效率低，并且，对一些不合理的断面不能进行直观的检查，使得此项工作十分的繁重。所以需要对常规的人工检查进行改进。目前的处理方法及不足目前对于数据转换，一种常用的方

5、式是直接使用Excel中的公式进行计算。在Excel工作簿中建立有3个工作表，分别命名为“原始数据”、“横断”、“纵断”，在“原始数据”工作表中进行采集数据的录入，在“横断”、“纵断”工作表中对原始数据进行处理，转换为纬地格式。在这两个工作表中，在足够范围内的每个单元格中都有对应的公式，这就使得整个工作簿很大，占用许多资源，并且要求每个单元格中的公式必须正确，如果某一单元格中的公式有误，则计算结果就会发生错误，而这一问题，在检查时则很难发现。虽然，在SCS中，提供了一项绘制断面图的功能，这就提供了一种对断面进行直观检查的方法，其要

6、求的数据格式如下：断面点个数8000000桩号高程000000桩号高程……然而在每次绘制断面图时都要求用户指定文件位置及文件名，确定断面图的绘制位置。由于借助CAD的强大功能，这对于纵断面检查来说很方便；但是对于横断面来说，由于断面数太多，要用户对每个断面的数据进行一次转换，绘制时都需要交互指定一次，就显得有些繁琐。这就需要一种新的途径处理这些问题。改进的处理方法及优势由于数据录入一般是在Excel中进行，并且提供设计的纬地格式数据一般也是Excel文件格式，而且Excel不仅仅具有一般电子表格软件的数据处理、统计分析、图表功能，

7、还集成了VBA环境，所以使用Excel进行数据转换就成为首选的一种方式。为了解决以上的数据处理中的不足，共进行了四项功能开发，设计了四个菜单项，对应设计了四个自定义按钮，界面如下：8在横断计算中，不但具有以前一样的横断数据转换功能，还添加了一些纠错功能。比如：当某断面数据中前面的断面点个数与后面实际输入的数据个数不同时，会自动提示断面个数不匹配，需要进行修改，并将光标指定在错误的桩号处；当数据在输入过程中，有可能在某个单元格中输入的数据有误，比如，将3.12错误输入为3..12，程序同样提示数据输入错误，需要修改，并将光标指定在错

8、误的桩号处，以方便修改。这样就提高了横断面数据检查工作的效率，减轻了检查工作的负担。在纵断计算中，添加了一项桩号排序自动检查功能，当输入的桩号不是按照顺序排列时，会自动弹出对话框如图：如果单击“是”，则忽略错误，继续计算；若单击“否”，则停止计算，