VB程序设计基础第4章程序的基本结构.pptVIP

例4.8 根据输入的百分制成绩Score，转换成优、良、中、及格、不及格5个等级，并在窗体上显示出来。等级划分标准如下： 优 Score=90 良 80=Score90 等级 = 中 70=Score80 及格 60=Score70 不及格 Score60 （四）If语句的嵌套： 注意： 1、EndIf 总是与最接近的If配对。 2、为增强程序的可读性，书写代码时最好采用锯齿形。 例 4.9 从键盘上输入三个整数，分别赋值给变量x1,x2,x3比较它们的大小并重新排列，使得x1x2x3。 二、情况语句（Select Case） ( 多分支结构) Visual Basic语言中，多分支结构也是可以通过情况语z实现的。 （一）情况语句的格式 Select Case 测试表达式 Case 表达式列表1 语句块1 Case 表达式列表2 语句块2 … … Case 表达式列表n 语句块n Case Else 语句块n+1 End Select （二） 语句执行的说明 1、 “测试表达式”——可以是数值型或字符串表达 式。 程序运行时会判断哪个“表达式”与“测试表达式”相符，若相符则执行“表达式”后面的语句块。可见:这种程序结构与前面的带ElseIf子句的If语句类似（多分支结构）。 表达式1 表达式2 表达式n-1 语句块1 语句块2 语句块n-1 语句块n False False False True True True 多分支结构流程图 2、表达式列表有三种描述形式 第一：可以是单值常量(数值或字符串)，当用“，”分割各个常量时，是“或”的逻辑关系 Month = InputBox(输入月份数：) Select Case Month Case 1, 3, 5, 7, 8, 10, 12 x = 本月有31天。 Case 4, 6, 9, 11 x = 本月有30天。 Case 2 x = 本月有28天。 Case Else x = 输入数值错误！ End Select 第二：条件是一个用TO说明的数值范围 x = InputBox(输入一个分数：) Select Case x Case 0 To 59.99 a = 不及格 Case 60 To 69.99 a = 及格 Case 70 To 79.99 a = 中 Case 80 To 89.99 a = 良好 Case 90 To 100 a = 优秀 End Select 第三：用IS来指定条件 IS代表测试表达式的值 Select Case x Case Is60 a = 不及格 Case Is70 a = 及格 Case Is80 a = 中 Case Is90 a = 良好 Case Is=100 a = 优秀 End Select （三）SELECT CASE语句应用的两个问题 1、在一个CASE子句中可以应用几种“条件”的形式。