实验六 分支程 序设计.docVIP

实验六 分支程序设计（二） 一、实验目的 ⒈ 掌握多分支程序设计的方法； ⒉ 掌握多条件选择语句和SELECT语句的使用； If…Then…ElseIf语句(多分支结构) 形式： If 表达式1 Then 语句块1 ElseIf 表达式2Then 语句块2 … ElseIf 表达式nThen 语句块n [Else 语句块 n+1 ] End If 不管有几个分支，依次判断，当某条件满足，执行相应的语句块，其余分支不再执行；若条件都不满足，且有Else子句，则执行该语句块，否则什么也不执行。ElseIf不能写成 Else If。 2. Select Case语句（情况语句） 形式： Select Case 测试表达式 Case 表达式1 语句块1 Case 表达式2 语句块2 … [Case Else 语句块n+1] End Select 测试表达式值的类型是数值型、字符串型等，一旦与某个Case后的表达式值相匹配，则执行这个Case中的语句块，完成后执行End Select后的语句。如果所有的Case后的表达式都不与测试表达式匹配，则执行Case Else后的语句。 Case 后面表达式i是与测试表达式同类型的下面四种情况之一： ① 单个常量、变量或表达式 比如：case 90 case “tom” ② 使用关键字“To”连接的两个值 比如：case 1 To 5 case “A” To “C” ③ Is关系运算符表达式 比如： case Is 60 ④ 以上三种的组合形式(使用逗号分隔) 比如：case 6, 8 To 9, Is12 四、实验示例 【例6-1】计算如下分段函数的值，x 的值从键盘输入。要求用If语句的多分支结构和Select分情况语句分别实现。 第一步：设计界面。 在窗体上添加一个标签、两个文本框和一个命令按钮，初始化界面如图6-1所示。 图6-1 程序的运行界面 第二步：编写代码并调试运行程序。 方法一：用If语句的多分支结构编写代码如图6-2所示。 图6-2 用If语句的多分支结构实现 方法二：用Select分情况语句编写代码如图6-3所示。 图6-3 用Select分情况语句实现 五、实验内容 练习1：输入一个数字（0~6），用中英文显示星期几。 第一步：设计界面。 1、新建一个工程，在工程的默认的窗体Form1中添加控件：1个标签控件Label1、1个命令按钮控件Command1、1个文本框Text1； 2、设置属性：分别设置Label1，Command1的属性对象 属性 属性值 说明 Command1 Caption 显示星期 按钮的标题 Text1 Text 0 文本框的内容 Label1 Caption 标签的内容 WordWrap True 文本打折 AutoSize True 自动适应大小 Private Sub Command1_Click() a = Val(Text1) Select Case a Case 0 Label1.Caption = 星期天(Sunday) Case 1 Label1.Caption = 星期一(Monday) Case 2 Label1.Caption = 星期二(Tuesday) Case 3 Label1.Caption = 星期三(Wednesday) Case 4 Label1.Caption = 星期四(Thursday) Case 5 Label1.Caption = 星期五(Friday) Case 6 Label1.Caption = 星期六(Saturday) End Select End Sub