项目六 第19练 多分支Select Case语句《Visual Basic 程序设计》（电工版第六版）一课一练

编写说明：考虑到中职学生普遍基础知识相对薄弱的情况，我们依据支架式教学理念，精心编制了《Visual Basic程序设计（第6版）》(电子工业出版社)一课一练。专辑里的每一份练习，都与课堂所授知识点紧密相关，题目围绕课堂所学知识点呈现。目的在于激发学生的学习兴趣，培养他们的学习自觉性，帮助学生扎实掌握课程的基本概念与基本方法，为他们后续的进一步提升奠定坚实基础。 本卷是《Visual Basic程序设计（第6版）》(电子工业出版社)一课一练的项目六的第19练，内容涵盖项目六选择结构相关内容。 《Visual Basic程序设计(第6版)》(电子工业出版社)第19练 项目六 选择结构 任务四 多分支Select Case语句 1、 单项选择题（本题共5小题） 1、Select Case 语句中，用于表示 “除已列出的 Case 外的所有情况” 的关键字是（ ） A. Else B. Case Else C. Default D. Other 2、以下 Select Case 语句中，不能正确匹配x=0的是（ ） A. Case Is = 0 B. Case 0 C. Case <1 And> -1 D. Case 0 To 3 3、关于 Select Case 与 IF 嵌套的对比，错误的是（ ） A. Select Case 更适合单变量多分支判断，IF 嵌套适合多条件组合判断 B. Select Case 匹配到第一个 Case 后立即结束，IF 嵌套需逐层判断 C. Select Case 支持多条件组合，IF 嵌套不支持 D. Select Case 代码可读性优于多层 IF 嵌套 4、以下 Select Case 语句存在语法错误的是（ ） A. Case 1,3,5: Print "奇数" B. Case Is < 0: Print "负数" C. Case 10 To 20: Print "10-20" D. Case > 5 And < 10: Print "5-10" 5、执行以下代码后，输出结果是（ ） Dim n As Integer n = 15 Select Case n Case 10: Print "10" Case 10 To 20: Print "10-20" Case Else: Print "其他" End Select A. 10 B. 10-20 C. 10 10-20 D. 其他 2、 填空题（本题共5小题） 1、在 Select Case 中，若需匹配 “变量值大于 100” 的情况，Case 后需写________（使用 Is 关键字）。 2、Select Case 语句中，多个不连续的常量值需用________符号分隔。 3、当 Select Case 的所有 Case 都不匹配时，会执行________关键字后的语句。 4、在 Select Case 中，指定数值范围需使用________关键字。 5、执行 Select Case 语句时，匹配到第一个符合条件的 Case 后，会________（立即结束 / 继续判断）语句。 三、程序填空题 1、下列程序功能：根据变量score的值输出成绩等级，补全 Case 条件： 90~100 → 优秀 80~89 → 良好 60~79 → 及格 0~59 → 不及格 Private Sub Command1_Click() Dim score As Integer score = Val(InputBox("请输入成绩：")) Select Case score Case __（1）____: Print "优秀" Case ___（2）___: Print "良好" Case __（3）____: Print "及格" Case __（4）____: Print "不及格" Case Else: Print "输入错误" End Select End Sub 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 $ 编写说明：考虑到中职学生普遍基础知识相对薄弱的情况，我们依据支架式教学理念，精心编制了《Visual Basic程序设计（第6版）》(电子工业出版社)一课一练。专辑里的每一份练习，都与课堂所授知识点紧密相关，题目围绕课堂所学知识点呈现。目的在于激发学生的学习兴趣，培养他们的学习自觉性，帮助学生扎实掌握课程的基本概念与基本方法，为他们后续的进一步提升奠定坚实基础。 本卷是《Visual Basic程序设计（第6版）》(电子工业出版社)一课一练的项目六的第19练，内容涵盖项目六选择结构相关内容。 《Visual Basic程序设计(第6版)》(电子工业出版社)第19练 项目六 选择结构 任务四 多分支Select Case语句 1、 单项选择题（本题共5小题） 1、Select Case 语句中，用于表示 “除已列出的 Case 外的所有情况” 的关键字是（ ） A. Else B. Case Else C. Default D. Other 【答案】 B 【解析】Case Else是 Select Case 的专属关键字，用于匹配所有未被前面 Case 覆盖的情况。 2、以下 Select Case 语句中，不能正确匹配x=0的是（ ） A. Case Is = 0 B. Case 0 C. Case <1 And> -1 D. Case 0 To 3 【答案】C 【解析】Case 后不能用And合并条件，需拆分为Case Is > -1, Is < 1。 3、关于 Select Case 与 IF 嵌套的对比，错误的是（ ） A. Select Case 更适合单变量多分支判断，IF 嵌套适合多条件组合判断 B. Select Case 匹配到第一个 Case 后立即结束，IF 嵌套需逐层判断 C. Select Case 支持多条件组合，IF 嵌套不支持 D. Select Case 代码可读性优于多层 IF 嵌套 【答案】 C 【解析】Select Case 的 Case 后不能直接写多条件组合（如And），需通过Is或逗号分隔（Case Is >0, Is <10）；IF 嵌套可通过And/Or实现多条件组合。 4、以下 Select Case 语句存在语法错误的是（ ） A. Case 1,3,5: Print "奇数" B. Case Is < 0: Print "负数" C. Case 10 To 20: Print "10-20" D. Case > 5 And < 10: Print "5-10" 【答案】 D 【解析】Case 后不能用And连接条件。 5、执行以下代码后，输出结果是（ ） Dim n As Integer n = 15 Select Case n Case 10: Print "10" Case 10 To 20: Print "10-20" Case Else: Print "其他" End Select A. 10 B. 10-20 C. 10 10-20 D. 其他 【答案】 B 【解析】Select Case 遵循 “先匹配先执行” 原则，n=15虽同时满足 “10-20” 范围，但第一个 Case（10）不匹配，匹配第二个 Case 后执行输出，且不会继续判断后续 Case。 2、 填空题（本题共5小题） 1、在 Select Case 中，若需匹配 “变量值大于 100” 的情况，Case 后需写________（使用 Is 关键字）。 【答案】 Is > 100 【解析】Case 后接关系表达式时，必须加Is关键字，格式为Case Is 关系运算符 数值。 2、Select Case 语句中，多个不连续的常量值需用________符号分隔。 【答案】 逗号 【解析】逗号表示 “或” 的关系，匹配任意一个值即可。 3、当 Select Case 的所有 Case 都不匹配时，会执行________关键字后的语句。 【答案】 Case Else 【解析】Case Else是可选关键字，用于兜底匹配所有未覆盖的情况，位置需在所有 Case 之后。 4、在 Select Case 中，指定数值范围需使用________关键字。 【答案】 To 【解析】Case 1 To 10表示匹配 1 到 10 的闭区间，To 前后的数值需满足 “前小后大” 5、执行 Select Case 语句时，匹配到第一个符合条件的 Case 后，会________（立即结束 / 继续判断）语句。 【答案】立即结束 【解析】Select Case 的 “短路匹配” 规则，匹配到第一个符合条件的 Case 后，不再执行后续任何 Case，直接结束语句。 三、程序填空题 1、下列程序功能：根据变量score的值输出成绩等级，补全 Case 条件： 90~100 → 优秀 80~89 → 良好 60~79 → 及格 0~59 → 不及格 Private Sub Command1_Click() Dim score As Integer score = Val(InputBox("请输入成绩：")) Select Case score Case __（1）____: Print "优秀" Case ___（2）___: Print "良好" Case __（3）____: Print "及格" Case __（4）____: Print "不及格" Case Else: Print "输入错误" End Select End Sub 【答案】 （1）90 To 100 （2）80 To 89 （3）60 To 79 （4）0 To 59 【解析】用To指定数值闭区间，是 Select Case 匹配范围的基础用法，需按 “前小后大” 顺序书写。 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 $