第16练 Select Case语句 《Visual Basic程序设计（电工版）》 （第6版） 一课一练 （内蒙古）

【编写说明】依托三阶支架资源编写方案，《一课一练》明确基础层具象化支架定位，作为课堂同步配套资源，其内容与课堂教学深度绑定，并且精准匹配中职学生知识基础与学习特质，遵循“由浅入深、循序渐进”的认知规律，聚焦基础性与实效性核心，通过拆解知识点、简化认知难度，切实降低学习门槛，为后续知识巩固与能力提升筑牢根基，是优质课后作业首选。本卷是《Visual Basic程序设计（电工版）》（第6版）《一课一练》第16练，内容是Select Case语句。 《Visual Basic程序设计（电工版）》（第6版）一课一练 第16练 Select Case语句 一、单选题 1. Select Case语句中，用于结束多分支判断的是（ ） A. End Select B. End Case C. End If D. Exit Select 2. Select Case语句中，Case后的值可以是（ ） A. 数值常量 B. 字符串常量 C. 范围表达式 D. 以上都可以 3. Select Case语句中，Case Else的作用是（ ） A. 匹配第一个条件 B. 匹配所有Case不满足的情况 C. 结束选择 D. 重新判断 4. Select Case x中，Case 1 To 5表示（ ） A. x等于1还是5 B. x从1到5的范围 C. x等于1加5 D. x小于5 5. Select Case x中，Case Is>10表示（ ） A. x等于10 B. x大于10 C. x小于10 D. x不等于10 6. Select Case与If...ElseIf相比的优势是（ ） A. 执行速度更快 B. 结构更清晰 C. 可以嵌套更多 D. 功能更强 7. Select Case语句中测试表达式可以是（ ） A. 数值表达式 B. 字符串表达式 C. 日期表达式 D. 以上都可以 二、填空题 8. Select Case语句必须以______结束 9. 在Case子句中，多个值之间用______分隔 三、程序填空题 10. 以下程序的功能是以下程序的功能是根据月份判断季节。请填空。 Private Sub Command1_Click() Dim month As Integer month = Val(Text1.Text) 【1】 month Case 3 To 5 Print "春季" Case 6 To 8 Print "夏季" Case 9 To 11 Print "秋季" Case 1, 2, 【2】 Print "冬季" 【3】 Print "月份错误" End Select End Sub 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 学科网（北京）股份有限公司 $ 【编写说明】依托三阶支架资源编写方案，《一课一练》明确基础层具象化支架定位，作为课堂同步配套资源，其内容与课堂教学深度绑定，并且精准匹配中职学生知识基础与学习特质，遵循“由浅入深、循序渐进”的认知规律，聚焦基础性与实效性核心，通过拆解知识点、简化认知难度，切实降低学习门槛，为后续知识巩固与能力提升筑牢根基，是优质课后作业首选。本卷是《Visual Basic程序设计（电工版）》（第6版）《一课一练》第16练，内容是Select Case语句。 《Visual Basic程序设计（电工版）》（第6版）一课一练 第16练 Select Case语句 一、单选题 1. Select Case语句中，用于结束多分支判断的是（ ） A. End Select B. End Case C. End If D. Exit Select 【答案】A 【解析】Select Case语句必须以End Select结束 2. Select Case语句中，Case后的值可以是（ ） A. 数值常量 B. 字符串常量 C. 范围表达式 D. 以上都可以 【答案】D 【解析】Case后可以接常量、范围、Is表达式等 3. Select Case语句中，Case Else的作用是（ ） A. 匹配第一个条件 B. 匹配所有Case不满足的情况 C. 结束选择 D. 重新判断 【答案】B 【解析】Case Else处理前面所有Case都不匹配的情况 4. Select Case x中，Case 1 To 5表示（ ） A. x等于1还是5 B. x从1到5的范围 C. x等于1加5 D. x小于5 【答案】B 【解析】Case 1 To 5表示x在1到5范围内时匹配 5. Select Case x中，Case Is>10表示（ ） A. x等于10 B. x大于10 C. x小于10 D. x不等于10 【答案】B 【解析】Case Is>10用Is代表测试变量x，表示x>10 6. Select Case与If...ElseIf相比的优势是（ ） A. 执行速度更快 B. 结构更清晰 C. 可以嵌套更多 D. 功能更强 【答案】B 【解析】Select Case对单个变量的多值判断更清晰 7. Select Case语句中测试表达式可以是（ ） A. 数值表达式 B. 字符串表达式 C. 日期表达式 D. 以上都可以 【答案】D 【解析】测试表达式可以是数值、字符串还是日期类型 二、填空题 8. Select Case语句必须以______结束 【答案】End Select 【解析】Select Case的结束标志是End Select 9. 在Case子句中，多个值之间用______分隔 【答案】逗号 【解析】Case后多个值用逗号分隔，如Case 1,3,5 三、程序填空题 10. 以下程序的功能是以下程序的功能是根据月份判断季节。请填空。 Private Sub Command1_Click() Dim month As Integer month = Val(Text1.Text) 【1】 month Case 3 To 5 Print "春季" Case 6 To 8 Print "夏季" Case 9 To 11 Print "秋季" Case 1, 2, 【2】 Print "冬季" 【3】 Print "月份错误" End Select End Sub 【答案】 【1】Select Case 【2】12 【3】Case Else 【解析】【1】处填Select Case开始多分支判断；【2】处填12表示冬季包含1、2、12月；【3】处填Case Else处理错误月份 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 学科网（北京）股份有限公司 $