专题四 选择结构程序设计（讲义）-《Visual Basic 程序设计》高考备考讲练测（内蒙古）

专题四 选择结构程序设计（讲义） ---《Visual Basic 程序设计》专题复习讲练测 [考纲要求] 1.条件表达式 2.简单条件选择结构的程序设计 3.多分支条件选择结构的程序设计 4.计时器控件Timer 5.单选钮控件OptionButton 6.复选框控件CheckBox [课时安排] 2课时 [知识梳理] 一：条件表达式 1. 关系表达式 将两个操作数进行大小比较，结果为逻辑值。关系表达式的格式为： <表达式1> <关系运算符><表达式 2> [ <关系运算符><表达式 3>...] 说明： （1） 在 VB 中，提供了 6 种关系运算符，即小于“<”、小于或等于“<=”、大于“>”、大于或等于“>=”、等于“=”、不等于“<> ”。 （2） 关系表达式的运算次序：先分别求出关系运算符两侧表达式的值，然后把二者进行比较，二者的关系若与关系运算符指示的一样，则关系运算的结果为 True, 否则为 False。 （3） 关系运算符两侧可以是数值型表达式、字符型表达式或日期型表达式，也可以是作为表达式特例的常量、变量或函数。 ①数值型数据：按数值大小进行比较。 ②字符型数据：按 ASCII 码值进行比较。在比较两个字符串时，首先比较两个字符串的第一个字符，ASCII 码值较大的字符所在的字符串大。如果第一个字符相同，则比较第二个，……，以此类推。 ③日期型数据：将日期看成“yyyymmdd”的 8 位整数，按数值大小比较。 （4） 关系运算符的运算级别相同，从左向右进行计算。 （5） 如果运算符两侧的数据类型不相同，则 VB 将进行强制转换。 2. 布尔表达式 布尔表达式是指用布尔运算符连接若干关系表达式或布尔值而组成的式子。 （1） 常用布尔运算符有3种：Not、And、Or。 （2） 非“Not”，表示由真变假，或由假变真，进行取“反”操作。 （3） 与“And”，两个表达式的值均为真，结果为真，否则为假。 （4） “Or”，两个表达式中只要有一个值为真，结果就为真，只有两个表达式的值为假，结果才为假。 二：简单条件选择结构 1. 双分支结构条件语句IF...Then...Else 格式： If <表达式> Then <语句块1> Else <语句块2> End If 2. 多分支结构条件语句IF...Then...ElseIf...End If 格式： If <表达式1> Then <语句块1> ElseIf <表达式2>Then <语句块2> [Else 语句块 n+1 ] End If 说明： （1）ElseIf不能写成 Else If （2）不管有几个分支，依次判断，当某条件满足，执行相应的语句，其余分支不再执行；（3）当多分支中有多个表达式同时满足时，则只执行第一个与之匹配的语句块； （4）若条件都不满足，且有Else子句，则执行该语句块，否则什么也不执行 3. IF语句的嵌套 If <表达式1> Then If <表达式11> Then … End If … End If 4. IF语句的嵌套格式ElseIf If <表达式1> Then <语句块1> ElseIf <表达式2> Then <语句块2> ... [Else <语句块n+1>] End If 三：多分支条件选择结构 Select Case语句可以进行多分支选择，从多个选择分支中，选择第一个条件为真的路线作为执行路线。 1. Select Case语句的语法格式 Select Case 变量或表达式 Case 条件1 <语句块1> Case 条件2 <语句块2> … [Case Else <语句块n+1>] End Select 说明： Case子句中的表达式表是一个或多个表达式的列表，形式有以下3种： （1） 表达式：表达式为数组表达式或字符串表达式。 （2） 表达式 To 表达式：用来指定一个值范围，较小的值要出现在To之前。 （3） Is 关系运算表达式：可以配合比较运算符来指定一个数值范围。如果没有提供，则Is关键字会被自动插入。 四：计时器 1. 常用属性 （1） Interval：Interval属性用于设置计时器触发事件的时间间隔，单位为毫秒 （2） Enabled属性：该属性为True时，计时器开始工作，为False，暂停。 2. 常用事件 （1） Timer事件 Timer事件是计时器控件的核心事件，在每个设定的时间间隔到达时自动触发 五：单选按钮 单项选择按钮(OptionButton)也称作选择按钮。一组单项选择按钮控件能够提供一组彼此相互排斥的选项，任何时刻只能从中选择一种选项，实现一种“单项选择”的功能。 1. 常用属性 (1) Value属性：该属性用来表示单选按钮选中或不被选中的状态。True为选中，False为不被选中。 (2) Caption属性：该属性显示出现在单选按钮旁边的文本。 (3) Style属性：该属性用来设置控件的外观。值为0和1。 (4) Enabled属性：该属性为True时，该控件可用，为False，禁用单选按钮。 2. 常用事件 单选按钮的常用事件是Click事件。 六：复选框 复选框(CheckBox)，单击复选一次时被选中，左边出现“√”号，再次单击则取消选中，清除复选框中的“√”。可同时使多个复选框处于选中状态，这一点和单选按钮不同。 1.常用属性 （1）Value属性 表示复选框的状态：0-未被选中；1-选中；2-灰色（禁止用户访问） 2.常用事件 复选框的常用事件是Click事件 [真题练讲] 1. 运行下面程序后运行后X的值是（ ）。 x=1 If x >= 1 Then x =x +1 If x > 2 Then x =x +2 If x > 3 Then x = x+3 A.1 B.2 C.4 D.7 【答案】B 【解析】第一个If语句：x >= 1条件成立（1 >= 1），执行x = x + 1，此时x的值变为 2。 2.如果要求设置Timer控件的时间间隔为5秒钟，那么它的Interval属性值应该等于 A. 5000 B. 500 C. 50 D. 5 【答案】A 【解析】本题考查Timer控件的Interval属性。Interval属性的单位是毫秒（ms），1秒=1000毫秒，因此5秒对应的属性值为5×1000=5000。因此答案选A。 3. 执行以下程序段后，显示的结果为（ ） Dim x x=Int(Rnd*2)+3 Select Case x Case Is<3 Print “早上好” Case 3 to 4 Print “中午好” Case Else Print “晚上好” End Select A．早上好 B．中午好 C．晚上好 D．无输出 【答案】B 【解析】Int(Rnd*2)将随机数取整，结果只能是 0 或 1。 Int(Rnd*2) + 3的可能值为 3或 4。 4. 决定单选按钮和复选框是否被选中的属性是__________________。 【答案】value 【解析】在 Visual Basic 中，单选按钮（OptionButton）和复选框（CheckBox）的Value属性用于表示其是否被选中。 5.下面程序段的功能是：在文本框中输入一个数据，如果该数据满足“既能被3 整除，又能被 7 整除”这个条件，则输出；否则，清除文本框的内容，并将焦点定位在文本框中。 Dim x As Integer x=______（1）_____ If _____（2）______ Then Print x Else Text1.Text=“” _____（3）______ End If 【答案】 （1） Val(Text1.Text) （2）x mod 3=0 And x mod 7=0 （3） Text1.SetFocus 【解析】文本框获得焦点的方法是SetFocus。 [限时练习] 1.为使计时器控件每隔5秒钟产生一个计时器事件(timer 事件)，则应将其Interval属性值设置为（ ） A.5 B.500 C.300 D.5000 【答案】D 【解析】计时器控件的 Interval 属性 用于设置触发 Timer 事件的时间间隔，其单位是毫秒（ms）。 2.可以通过( )来删除列表框中的选择项。 A.Enable属性 B.RemoveItem方法 C.AddItem方法 D.Text属性 【答案】B 【解析】RemoveItem 方法：专门用于专门的功能是从列表框中删除指定索引位置的项目。 3.若要在列表框中显示多列数据，可用列表框的( )属性来实现。 A.MultiSelect B.Index C.Columns D.List 【答案】C 【解析】Columns：专门用于控制列表框的列数。当该属性值为 0 时，列表框为单列且垂直滚动；当值为 1 或更大时，列表框会按指定列数显示数据，并支持水平滚动，从而实现多列数据的显示。 4.运行下面程序后，在弹出的消息窗口中显示的是（ ）。 Private Sub Form_Click() score=Int(Rnd)+5 Select Case score Case 5 a$="Good" Case 4 a$="Ok" Case 3 a$="Pass" Case Else a$="Bad" End Select MsgBox a$ End Sub A. Bad B. Pass C. Ok D. Good 【答案】D 【解析】Rnd 函数返回一个大于等于 0 且小于 1 的单精度随机数。 5.若整型变量a的值为2、b的值为3，则下列程序段执行后整型变量c的值为（ ）。 If a>5 then if b<4 then c=a-b else c=b-a End if elseif b>3 then c=a*b else c=a mod b End if A. 2 B.-1 C.1 D.6 【答案】A 【解析】首先判断外层条件 If a > 5：执行 ElseIf b > 3：执行最外层 Else 分支。 6.复选框控件其Value属性的可取值是( )。 A.True和False B.0和1 C.1、2、3 D.0、1、2 【答案】D 【解析】复选框的 Value 属性用于表示其选中状态，可取值为：0、1、2。 7.下列（ ）方法是将项目添加到List控件中。 A.List B.ListCount C.Move D.AddItem 【答案】D 【解析】AddItem：是专门用于向列表框中添加项目的方法，语法为 List1.AddItem "项目内容"，可在列表末尾或指定位置添加新项。 8.列表框中的列表项的数目可通过以下( )属性的值获得。 A.Count B.ListCount C.ListIndex D.Index 【答案】B 【解析】 ListCount：是列表框的核心属性，专门用于返回列表中项目的总数。 9.引用列表框的最后一项应使用（ ）。 A.List1.List(List1.ListCount-1) B.List1.List(List1.ListCount) C.List1.List(ListCount) D.List1.List(ListCount-1) 【答案】A 【解析】列表框的 List 属性是一个数组，用于访问具体项目，索引从 0 开始。 10.在Visual Basic中，为了让计时器控件每隔10秒产生一个Timer事件，应把Interval属性设置为____________。 【答案】10000 【解析】计时器控件（Timer）的 Interval 属性用于单位是毫秒（ms），用于设置触发 Timer 事件的时间间隔。 [内容小结] 1.本章节是关于选择结构的知识点，关于选择结构的执行过程，可以利用程序流程图对相应知识点进行梳理总结。 2.本章节的重点是IF语句、Select语句的执行过程；计时器、单选按钮、复选按钮控件的属性和方法。 3.本章节的难点在于对选择结构的灵活应用。 学科网（北京）股份有限公司 学科网（北京）股份有限公司 $