项目六 第16练 单行If...Then条件语句《Visual Basic 程序设计》（电工版第六版）一课一练

编写说明：考虑到中职学生普遍基础知识相对薄弱的情况，我们依据支架式教学理念，精心编制了《Visual Basic程序设计（第6版）》(电子工业出版社)一课一练。专辑里的每一份练习，都与课堂所授知识点紧密相关，题目围绕课堂所学知识点呈现。目的在于激发学生的学习兴趣，培养他们的学习自觉性，帮助学生扎实掌握课程的基本概念与基本方法，为他们后续的进一步提升奠定坚实基础。 本卷是《Visual Basic程序设计（第6版）》(电子工业出版社)一课一练的项目六的第16练，内容涵盖项目六选择结构相关内容。 《Visual Basic程序设计(第6版)》(电子工业出版社)第16练 项目六 选择结构 任务一 单行If...Then条件语句 1、 单项选择题（本题共5小题） 1、以下单行 IF 语句书写正确的是（ ） A.If a > 10 Then Print "合格" Else Print "不合格" B.If b < 0 Then c = 0 Else c = b End If C.If x = y Then : m = 1 : n = 2 : Else m = 2 : n = 1 D.If 5 < 3 Print "错误" 2、执行以下代码后，Print s的输出结果是（ ） Private Sub Command1_Click() Dim s As Integer s = 5 If s > 3 Then s = s + 2 Else s = s - 2 Print s End Sub A.7 B.3 C.5 D.报错 3、以下关于单行 IF 和块 IF 的说法，错误的是（ ） A.单行 IF 语句无需写End If，块 IF 必须写 B.单行 IF 的Then后可接多条语句，用:分隔，块 IF 的Then后需换行写执行语句 C.单行 IF 支持Else If嵌套，块 IF 不支持 D.单行 IF 适合简单分支逻辑，块 IF 适合复杂多分支逻辑 4、执行以下代码后，输出结果是（ ） Private Sub Command6_Click() Dim x As Integer x = 12 If x Mod 4 = 0 Then x = x / 2 : Print x Else Print x + 1 End Sub A.6 B.13 C.12 D.24 5、下面关于VB单行IF语句的描述，正确的是（ ） A. 必须包含Else子句 B. 不能包含ElseIf子句 C. 语句结束后不需要End If D. 只能用于赋值语句 2、 填空题（本题共5小题） 1、在VB单行IF语句中，当条件为False时需要执行的语句应放在关键字_______之后。 2、与块IF语句不同，单行IF语句在结束时_______（需要/不需要）使用End If。 3、在单行IF语句中，如果需要在Then后面执行多个语句，各语句之间应使用_______符号分隔。 4、执行语句If x > 0 Then y = 1 Else y = -1后，若x的值为-5，则y的值为_______。 5、在VB中，单行IF语句的条件判断结果必须是_______类型的数据。 三、程序填空题 1、下列程序功能：实现 “若a大于b，则交换a和b的值。 Dim a As Integer, b As Integer, t As Integer a = 20: b = 10 If a > b Then __（1）____ : __（2）____ : ____（3）__ 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 $ 编写说明：考虑到中职学生普遍基础知识相对薄弱的情况，我们依据支架式教学理念，精心编制了《Visual Basic程序设计（第6版）》(电子工业出版社)一课一练。专辑里的每一份练习，都与课堂所授知识点紧密相关，题目围绕课堂所学知识点呈现。目的在于激发学生的学习兴趣，培养他们的学习自觉性，帮助学生扎实掌握课程的基本概念与基本方法，为他们后续的进一步提升奠定坚实基础。 本卷是《Visual Basic程序设计（第6版）》(电子工业出版社)一课一练的项目六的第16练，内容涵盖项目六选择结构相关内容。 《Visual Basic程序设计(第6版)》(电子工业出版社)第16练 项目六 选择结构 任务一 单行If...Then条件语句 1、 单项选择题（本题共5小题） 1、以下单行 IF 语句书写正确的是（ ） A.If a > 10 Then Print "合格" Else Print "不合格" B.If b < 0 Then c = 0 Else c = b End If C.If x = y Then : m = 1 : n = 2 : Else m = 2 : n = 1 D.If 5 < 3 Print "错误" 【答案】 A 【解析】单行 IF 语句不能加 End If; 单行 IF 语句中Then后若有多条语句，需用:分隔，但Else前不能加:. 2、执行以下代码后，Print s的输出结果是（ ） Private Sub Command1_Click() Dim s As Integer s = 5 If s > 3 Then s = s + 2 Else s = s - 2 Print s End Sub A.7 B.3 C.5 D.报错 【答案】 A 【解析】条件s>3（5>3）成立，执行Then后的语句s = s+2，即5+2=7，最终输出 7。 3、以下关于单行 IF 和块 IF 的说法，错误的是（ ） A.单行 IF 语句无需写End If，块 IF 必须写 B.单行 IF 的Then后可接多条语句，用:分隔，块 IF 的Then后需换行写执行语句 C.单行 IF 支持Else If嵌套，块 IF 不支持 D.单行 IF 适合简单分支逻辑，块 IF 适合复杂多分支逻辑 【答案】 C 【解析】块 IF 同样支持ElseIf（无空格）嵌套。 4、执行以下代码后，输出结果是（ ） Private Sub Command6_Click() Dim x As Integer x = 12 If x Mod 4 = 0 Then x = x / 2 : Print x Else Print x + 1 End Sub A.6 B.13 C.12 D.24 【答案】 A 【解析】条件x Mod 4=0（12÷4 余 0）成立，先执行x=x/2（12→6），再执行Print x，输出 6。 5、下面关于VB单行IF语句的描述，正确的是（ ） A. 必须包含Else子句 B. 不能包含ElseIf子句 C. 语句结束后不需要End If D. 只能用于赋值语句 【答案】 C 【解析】 单行 IF 语句整体写在一行，结束后不需要加End If。 2、 填空题（本题共5小题） 1、在VB单行IF语句中，当条件为False时需要执行的语句应放在关键字_______之后。 【答案】 Else 【解析】关键字Else后紧跟条件为 False 时要执行的语句。 2、与块IF语句不同，单行IF语句在结束时_______（需要/不需要）使用End If。 【答案】 不需要 【解析】单行 IF 语句：所有逻辑写在同一行，语法格式为 If 条件 Then 语句 [Else 语句]，语句结束后无需加End If 3、在单行IF语句中，如果需要在Then后面执行多个语句，各语句之间应使用_______符号分隔。 【答案】 冒号 【解析】在 VB 单行 IF 语句中，Then后若要执行多条语句，必须用冒号（:） 作为语句分隔符。 4、执行语句If x > 0 Then y = 1 Else y = -1后，若x的值为-5，则y的值为_______。 【答案】 -1 【解析】-5 > 0 的结果为 False；根据单行 IF 语句规则，条件为 False 时，执行Else后的语句 y = -1。 5、在VB中，单行IF语句的条件判断结果必须是_______类型的数据。 【答案】布尔 【解析】VB 的单行 IF 语句核心是 “条件判断”，而判断的结果只能是布尔类型（Boolean） —— 即仅有True（真）或False（假）两种值，这是 IF 语句执行分支逻辑的基础。 三、程序填空题 1、下列程序功能：实现 “若a大于b，则交换a和b的值。 Dim a As Integer, b As Integer, t As Integer a = 20: b = 10 If a > b Then __（1）____ : __（2）____ : ____（3）__ 【答案】 （1） t = a （2） a = b （3） b = t 【解析】交换两个变量需借助临时变量t，单行 IF 中用:分隔三条赋值语句，条件成立时依次执行。 原创精品资源学科网独家享有版权，侵权必究！ 学科网（北京）股份有限公司 $