第5章 控结构程序设计.ppt

第5章 控制结构程序设计 本章内容及要求： 掌握用流程图表示算法 熟练掌握if选择结构、Select Case选择结构的使用，掌握选择的嵌套结构； 3. 熟练掌握For/Next循环结构、Do/Loop循环结构的使用，掌握多重循环。 5.2 顺序结构 顺序结构是最基本的一种结构，它按照语句出现的先后顺序依次执行； 对于顺序执行的有关语句有：赋值语句、结束语句、输入、输出语句等 。 赋值语句 形式: 变量名＝表达式 对象.属性＝表达式 功能： 将表达式的值赋值给变量名或指定对象的属性。 一般用于给变量赋值或对控件设定属性值. 例： A%=10 Text1.Text ＝ 欢迎使用Visual Basic 6.0” 说明： 1. 执行过程：先求表达式的值，然后将值赋值给左边的变量。 2. 右边表达式可以是变量、常量、函数调用等特殊的表达式。 3. 不要将“＝”理解为数学上的等号： 例： A=A+1 是表示将A单元的值加１后以放回到A单元。 例5.1 设计一个应用程序，交换变量x，y的值。 5.2 选择结构 1. If…Then语句(单分支结构) 格式： If 条件表达式 Then 语句块 End If 或 If 条件表达式 Then 复合语句行 例5.2:已知两个数x和y，比较它们的大小，使得x大于y. 例:已知两个数x和y，比较它们的大小，使得x大于y. 2. If…Then…Else语句(双分支结构) 格式： If 表达式 Then 语句块1 Else 语句块2 End If 或 If 表达式 Then 复合语句行1 Else 复合语句行2 例：输出x, y两个中值较大的一个值。代码如下：IF XY Then Print XElse Print YEnd If也可以写成如下的单行形式： IF XY Then Print X Else Print Y 例5.3 计算以下分段函数的值。 x3+1 (x≤0) y = 2 (0﹤x≤2) 5x (x﹥2)问题分析：该问题是根据x的不同取值，选择不同的公式计算y的值，即：（1）如果 x = 0 成立，则y = x ^ 3 + 1；（2）如果 x 0 And x = 2 成立，则y = 2；（3）如果 x 2 成立，则y = 5 * x 。显然，该题目可以用3个单分支语句顺序执行。 3. If…Then…ElseIf语句(多分支结构) 格式: If 表达式1 Then 语句块1 ElseIf 表达式2Then 语句块2 … [Else 语句块 n+1 ] End If 执行过程： Select Case语句（情况语句） 形式： Select Case 变量或表达式 Case 表达式列表1 语句块1 Case 表达式列表2 语句块2 … [Case Else 语句块n+1] End Select 2.测试表达式可以是数值表达式或者字符表达式。 每个Case语句中的语句块可以是一行或多行VB语句 表达式可以有下面的几种形式： 表达式 Private Sub Form_Click() x = 0:y = 4 Select Case y Case x + 3 Print y Case Else Print x End Select End Sub 枚举表达式（用逗号分开） Case 2，4，6，8－－则当测试表达式的值与其中的一个相同的时候就执行该Case语句中的语句块。 表达式1 to 表达式2 Case 2 TO 10－－则只要测试表达式的结果在这个范围之内就执行该Case语句中的语句块。 Is关系表达式 Case Is18*a－－只要测试表达式的值满足18*a的条件，就执行该Ca