条件方程有两种形式：①直接表示观测值平差值应满足的条件，其一般形式为f()=0，其中表示观测值向量的平差值。②设定一组数目为t的函数独立参数，将所有观测值平差值表示为的函数，其一般形式为=fi()。测量平差中将观测值代入后所得不符值称为闭合差。......
2023-10-22
测量平差程序设计：代码执行流程控制
【摘要】：封装在事件、通用或函数过程中的程序代码，执行顺序是三种基本程序结构的组合：顺序结构：程序按语句顺序由上而下逐句执行。其语法结构为：图1.2单分支结构图1.3双分支结构③多分支结构。给定的条件称为循环条件，反复执行的程序段称为循环体。图1.6不计次循环结构（后测型）其语法结构如下：功能：当关键字While 或关键字Until后条件为真时，执行循环体。
封装在事件、通用或函数过程中的程序代码，执行顺序是三种基本程序结构的组合：
顺序结构：程序按语句顺序由上而下逐句执行。
选择结构：程序按设定的条件实现程序语句的选择执行。
循环结构：程序按给定的条件重复地执行设定的程序段或过程。
1.顺序结构
从上往下按顺序执行的语句结构。
2.选择结构
根据设定的条件分析，比较和判断，选择性地执行不同的程序代码。
（1）If语句结构。
If语句分单分支结构、双分支结构和多分支结构三种情况。If语句的“条件”是一个逻辑表达式，VB系统根据条件判断返回True或False，选择执行不同的程序语句块。
①单分支结构（图1.2）。
其语法结构为：
②双分支结构（图1.3）。
其语法结构为：
图1.2 单分支结构
图1.3 双分支结构
③多分支结构（图1.4）。
图1.4 多分支结构
其语法结构为：
（2）Select Case语句。
Select Case语句首先判断一个表达式的值，然后根据表达式的值选择执行不同的程序语句块。
其语法结构如下：
Select Case的执行过程是：在Select Case关键字后的测试条件中计算测试表达式，然后VB将表达式的值与结构中每一个Case关键字后的值进行比较，若相等就执行与该Case相关联的语句块。(www.chuimin.cn)
在Select Case结构中，Case关键字后表达式可以是几个值的列表，各值之间用逗号分隔。如果有多个Case关键字后表达式值与测试表达式值匹配，则只执行第一个匹配的Case关键字后语句块。
Select Case与If...Then...Else结构的区别在于，Select Case结构只在开始处计算测试条件的值，而If...Then...Else结构为每个Else If语句计算不同的表达式。因此在处理多重选择问题时，If...Then...Else结构能适应更复杂的选择性，而Select Case结构更具可读性并且执行效率更高。
3.循环结构
循环结构是数值计算程序中最重要的结构之一，在复杂数值计算程序中起着不可替代的作用。循环结构是在给定条件成立时，反复执行某程序段，直到条件不成立为止。给定的条件称为循环条件，反复执行的程序段称为循环体。在VB中提供了多种循环语句供用户使用，下面介绍两种常用的形式：For语句和Do语句。
（1）For语句（计次循环语句）。
For循环（For…Next）语句的基本格式为：
其中循环变量为数值型变量，初值、终值、增量均为数值型变量。“Step”部分可以省略，缺省时默认为1。在循环体中使用Exit For语句可直接中止循环，跳出循环并执行Next后面的语句。正常循环结束后跳出循环时，循环变量值为循环变量终值＋增量值，使用Exit For语句终止循环时，循环变量保持退出时的值。
For循环的执行过程如下：
①将循环变量赋初值。
②比较循环变量是否小于或等于终值（如Step后增量值为负值，则比较是否大于或等于终值），小于或等于（大于或等于）时循环条件成立，运行循环体中的语句，若条件不成立，结束循环执行Next后的语句。
③循环体执行完毕后至Next语句，循环变量增加增量值，转到②继续比较执行。
（2）Do语句。
For…Next循环语句用于循环次数确定的循环问题，对于循环次数未知的循环问题，Visual Basic设置了Do循环语句。
①第一种循环结构（图1.5）。
图1.5 不计次循环结构（前测型）
其语法结构如下：
②第二种循环结构（图1.6）。
图1.6 不计次循环结构（后测型）
其语法结构如下：
功能：当关键字While 或关键字Until后条件为真（True）时，执行循环体。
说明：第一种格式为先判断后执行，有可能一次也不执行；第二种格式为先执行后判断，至少执行一次循环体；
Exit Do：类似于Exit For语句，执行该语句后，退出循环执行Loop后的语句。
说明：上述两种Do循环是以关键字while为例,条件成立进入循环；若选用关键字until，则是条件成立时，结束循环。
有关测量平差程序设计 第2版的文章
- 详细阅读
-
测量平差程序设计：对象概念详细阅读
图1.7属性栏②通过程序代码赋值。图1.8访问Label1.Caption属性运行结果访问对象的方法。方法是VB为对象预设的、用户不能更改的事件过程，不同的对象具有不同的方法。前者由滚动条的Value值变化激发，后者在滚动框被拖动时引发。......
2023-10-22
-
测量平差程序设计方程法详细阅读
设有n个观测值，组成误差方程组为：应用最小二乘准则组成法方程组，其纯量形式为：其中法方程系数、常数阵中的数值由此可见自乘系数[paa]是由n个值的和组成，这n个值分别是各观测值误差方程中第一个未知数系数平方乘以观测值的权；互乘系数[pab]也是由n个值的和组成，这n个值分别是各观测值误差方程中第一个和第二个未知数系数之积乘以观测值的权。根据这一特点，平差程序组法方程采用的算法是：①按测站循环。......
2023-10-22
-
测量平差程序设计：工程概念详细阅读
Visual Basic 6.0可以创建标准的Windows应用程序、ActveX与Active文档等，在设计阶段，VB通称它们为一个工程。设计VB程序涉及工程与文件的新建、保存、移除等多种操作，这些操作贯穿于创建应用程序的整个过程。工程资源管理器是用来管理工程的，它的功能就像Windows中的资源管理器一样。图1.21工程资源管理器在工程资源管理器中，显示有工程名、工程文件名、窗体名和窗体文件名。工程名为VB对用户所创建的应用程序的标识。......
2023-10-22
-
测量平差程序设计：过程的定义详细阅读
VB程序是由过程组成的，每个过程是为了完成设定的任务，由一组独立的程序代码组成。图1.11添加过程对话框在“添加过程”对话窗口中只需确定过程名称、类型等信息后回车确定，VB系统即可自动生成“过程”的首尾关键字，用户所需做的工作只是在其中编写代码。......
2023-10-22
-
平面控制网数据结构测量平差程序设计详细阅读
观测数据的录入按测站进行，首先录入测站名，每个测站名单独占一行，这也是平面控制网数据结构中唯一不带逗号分隔符的数据行。上述数据结构简单易记、无冗余信息。平差计算中需要的已知点数、待定点数、方向观测值数、边长观测值数、测站数、多余观测数等重要信息均反映在数据编排格式中，平差计算程序在录入数据时，可以自行判读或计算出来，因而极大地方便了用户，是测量平差程序数据结构设计的典范。......
2023-10-22
-
测量平差程序设计：模块和层次结构详细阅读
图1.1VB应用程序的组织结构1.窗体模块窗体模块包含窗体及其控件的属性设置、事件过程、窗体内自定义过程的窗体级声明等。标准模块是VB程序中的一个独立模块，包含模块级或全局变量声明、函数过程和通用过程，标准模块的文件扩展名为.bas。标准模块中除包含允许其它模块访问的过程，还包括变量、常量、数据类型、自定义过程的全局或模块级声明。......
2023-10-22
-
测量平差程序设计：误差椭圆及参数详细阅读
误差曲线形状接近椭圆，其极径的长度即等于点位中误差在该方向的投影。由于点位中误差平方等于点位中误差在任意两个相互垂直方向投影的平方和，所以有：图2.6误差椭圆曲线令，得到-qxxsin2φ0+qyysin2φ0+2qxy cos2φ0=0。受当时技术条件局限，测量上长期以椭圆代替误差曲线，称为点位的误差椭圆，长轴坐标方位角Eφ和长短半轴E、F称为点位误差椭圆的参数。图2.8点位落入误差椭圆的概率......
2023-10-22
相关推荐