水准网平差(VB代码).docx

水准网平差(VB代码).docx

ID:62506380

大小:35.39 KB

页数:26页

时间:2021-05-10

水准网平差(VB代码).docx_第1页
水准网平差(VB代码).docx_第2页
水准网平差(VB代码).docx_第3页
水准网平差(VB代码).docx_第4页
水准网平差(VB代码).docx_第5页
资源描述:

《水准网平差(VB代码).docx》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、(误差理论与测量平差础)课程设计报告系(部):土木工程系实习单位:山东交通学院班级:测绘084学生姓名:田忠星学号080712420带队教师:夏小裕、周宝兴时间:10年12月_13日到10年12月二9日山东交通学院目录:1.摘要P32.概述P33.水准网间接平差程序设计思路P3—P44.平差程序流程图P4—P65.程序源代码及说明P7—P236.计算结果P23—P267.总结P26—P27一:摘要在测量工作中,为了能及时发现错误和提高测量成果的精度,常作多余观测,这就产生了平差问题。在一个平差问题中,当所

2、选的独立参数X?的个数等于必要观测数t时,可将每个观测值表达成这t个参数的函数,组成观测方程,这种以观测方程为函数模型的平差方法,就是间接平差。二:概述:该课程设计的主要目是对水准网进行间接平差,在输入数据后依次计算高程近似值、误差方程和平差计算。三:水准网间接平差程序设计思路1.根据平差问题的性质,选择t个独立量(既未知点的高程)作为参数X?2.将每一个观测量的平差值(既观测的高程差值)分别表达成LLV3.由误差方程系数B和自由项组成法方程,法方程个数等于参数的个数t;4.解算法方程,求出参数刃,计算参

3、数(高程)的平差值X?=X0+x?;5.由误差方程计算V,求出观测量(高差)平差值LLV6.评定精度单位权中误差VTPVrVTPVnus平差值函数的中误差四:平差程序流程图1.已知数据的输入需要输入的数据包括水准网中已知点数、未知点数以及这些点的点号,已知高程和高差观测值、距离观测值。程序采用文件方式进行输入,约定文件输入的格式如下:第一行:已知点数、未知点数、观测值个数第二行:点号(已知点在前,未知点在后)第三行:已知高程(顺序与上一行的点号对应)第四行:高差观测值,按“起点点号,终点点号。高差观测值,

4、距离观测值”的顺序输入。本节中使用的算例的数据格式如下2,3,7123,4,55.016,6.0161,3,1.359,1.11,4,2.009,1.72,3,0.363,2.32,4,1.012,2.73,4,0.657,2.43,5,0.238,1.45,2,-0.595,2.62.平差计算过程(1)近似高程的计算。用一个数组来存储高程近似值,已知点的高程放在这个数组的开头,然后按照点号输入顺序依次搜索涉及该店的高差观测值,看该高差涉及的另一点是否已知,若未知,则检查下一个高差观测值,若已知,则可以计

5、算出当前未知点的高差近似值,并放入高程近似值数组,依次类推,直到所有未知点的高程近似值都被求出为止。(2)列立观测值的误差方程。根据各观测值的起止点信息及高差、距离值和误差方程的系数矩阵、权矩阵和常数项的各个元素赋值。(3)平差计算。通过间接平差通用过程进行平差计算,该过程将系数矩阵数组A、权矩阵数组P和常数向量数组L以参数的方式传入,通过计算,把平差结果存放在解向量数组X中,以参数的形式传出。3.计算结果的输出计算的中间结果和最后结果都实时在文本框中显示,最后还可以把文本框中的内容保存在文本文件中。4.

6、界面设计根据以上分析,本程序采用菜单组织程序,用文本框显示数据的输入、计算和输出情况。由于涉及到打开和保存文件的操作,所以还需要一个通用对话框。(1)菜单设计。本程序的菜单结构如表所示。标题名称快捷键文件(&File)mnuFile—…打开数据mnuOpen—…保存结果mnuSave—.…aa—…退出mnuExitCtrl+E计算(&Calc)mnuCalc—…近似高程mnuHeight—…误差方程mnuEqu—…平差计算mnuAdj—(2)窗体、文本框和通用对话框。在主窗体上绘制1个文本框控件和一个通用

7、对话框控件,并按照下图设置属性(文本框的Name属性改为txtShow)对象属性值Text1TextText1MultiLineTrueFormlCaption水准网间接平差CommonDialoglNameCDg1Textl设计好属性后,调整控件和窗体的大小和位置,以方便美观为好。五:程序源代码及说明程序中涉及的公共变量及其说明如下:DimstrFileNameAsStringDimnn%,un%,tn%,hn%个数,总点数,观测值个数DimPname()AsStringDimHknown()AsDou

8、ble已知点高程和高程近似值Dimbe%(),en%()编号数组,存储的是点序号Dimh#(),s#()观测值数组DimA#(),X#(),P#(),L#()量、权阵和常数向量1.数据输入'已知点个数,未知点'点名数组'已知高程数组,存放'观测值的起点和终点'高差观测值数组和距离'间接平差的系数阵、解向单击“文件-打开文件”命令,弹出打开对话框,待用户选取了文件以后,程序开始读取已知数据,具体代码如下PrivateSubmnu

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。