VB程序设计第5章选择结构程序设计….pptVIP

第5章 选择结构程序设计▲ 5.1 单行结构条件语句 1. 格式 If 条件 Then [语句组1] [Else 语句组2] 2. 功能 如果条件成立，则执行语句组1 否则执行语句组2 3. 说明 (1) 条件 可以是： 关系表达式 布尔表达式 数值表达式：0为False；非0为True 字符串表达式： 0为False；非0为True (2) 可以没有Else部分，这时必须有语句组1。 (3) 语句组1、语句组2: 可以有多条语句，各语句之间用冒号隔开。 例: If N0 Then A=A+B:B=B+A Else A=A-B:B=B-A (4)应作为一条语句书写。如果语句太长需要换行，必须在折行处使用续行符号。 (5) 无论条件是否成立，都具有共同出口 例: If X = 0 Then X = 1 + X Else X = 5 - X Y = 1 - X Print Y=; Y 若 X=2 则打印 Y=-2 若 X=-2 则打印 Y=-6 【例5-1】设界面如下图所示，用文本框输入x的值，单击“计算Y”按钮时，根据以下公式计算y的值。 例: 比较以下两段程序，是否都能够实现上例的功能。 【例5-2】平面直角坐标系中，不同的象限内，点的坐标的符号有以下4种情况: 第一象限 X0,Y0 第二象限 X0,Y0 第三象限 X0,Y0 第四象限 X0,Y0 任意输入一对坐标值，找出它所在的象限。 5.2 块结构条件语句 1.格式 If 条件1 Then [语句组1] [ElseIf 条件2 Then [语句组2]] …… [ElseIf 条件N Then [语句组N]] [Else [其他语句组]] End If 块结构条件语句的功能： 【例5-3】输入华氏温度F，利用公式C=5/9*(F-32)转换成摄氏温度C，根据转换结果C的不同值，按以下要求给出相应的提示。 Private Sub Command1_Click() C = 5 / 9 * (Val(Text1.Text) - 32) Text2.Text = Format(C, 0.00) If C 40 Then Label2.Caption = HOT ElseIf C 30 Then Label2.Caption = WARM ElseIf C 20 Then Label2.Caption = ROOM TEMPERATURE ElseIf C 10 Then Label2.Caption = COOL ElseIf C 0 Then Label2.Caption = COLD Else Label2.Caption = FREEZING End If End Sub 注意： (1) ElseIf不能写成Else If，即中间不能有空格。 (2) 在书写时，可以将If语句、ElseIf子句、Else子句、和End If语句左对齐，而各语句组向右缩进若干空格，以使程序结构更清楚。 (3) 严格按格式要求书写，不可随意换行或将两行合并成一行。例如，对于条件结构： If x = 0 Then y = 1 Else y = 2 End If 以下两种写法都是错误的： 说明： 1）表达式：可以是一个数值表达式或字符串表达式，通常使用一个数值类型或字符串类型的变量。 2）Case 值列表i ：是Case子句，如果表达式与某个Case子句的值列表i相匹配，则执行该Case子句中的语句组i Case子句中的“值列表i”可以有三种表示形式： ①一个或多个常量，多个常量之间用“，”分开。 ②使用To关键字，用以指定一个数值范围，要求小的数在To之前， 如1 To 10。 ③Is关键字与比较运算符配合使用，用以指定一个数值范围，如 Is 20。 在每个Case子句的值列表中，以上三种形式可以任意组合使用。如：Case 3，5，7 To 9 ，Is 2 。 3）Case Else：当表达式的值与前面所有的Case子句的值列表都不匹配时的情况下执行语句组N 4）End Select：为多分支结构语句的结束标志。 注意： （1）如果某个值列表i与表达式的值相匹配，就执行该Case子句中的语句组i，之后该