VB选择结构程序设计

1、,VB编程尽管采用事件驱动机制，调用功能相对独立的过程，但在设计过程的程序代码时，仍需要对过程的流程进行控制 程序流程有三种最基本的控制结构，即顺序结构、选择结构和循环结构,选择结构设计,用顺序结构编写的程序比较简单，只能实现一些简单的处理。在实际应用中，有许多问题需要判断某些条件，根据判断的结果来控制程序的流程。使用选择结构的程序，可以实现这样的处理 VB中实现选择结构的语句主要有： If语句 Select Case语句 使用选择结构语句时，要用条件表达式来描述条件 条件表达式可以分为： 关系表达式 逻辑表达式 条件表达式的取值为逻辑值（也称布尔值）： 真（True） 假（False）,关系

2、表达式, 关系运算符的运算级别相同，运算时按其出现的顺序从左到右执行 关系运算符两侧可以是数值、字符或日期表达式，但类型必须完全一致 字符型数据按其ASCII码值进行比较 日期型数据将日期看成“yyyymmdd”8位数字，再按数值比较 Like用于判断一个字符串是否属于某一种样式（内有通配符）,关系表达式（也称关系式）是用比较运算符把两个表达式连接起来的式子,逻辑表达式,逻辑表达式是用逻辑运算符把关系表达式或逻辑值连接起来的式子,说明: 逻辑表达式的运算顺序是：先进行算术运算或字符串运算，再做比较运算，最后进行逻辑运算。括号优先，同级运算从左到右执行 逻辑运算符按Not、And、Or、Xor、

3、Eqv、Imp的优先顺序级执行 有时一个逻辑表达式里还包含多个逻辑符，例如： 32 And Not 4=0) 1-2x (x= 0 Then y = 1 + x Else y = 1 - 2 * x Text2.Text = y Text1.SelStart = 0 Text1.SelLength = Len(Text1.Text) Text1.SetFocus End Sub Private Sub Form_Activate() Text1.SetFocus End Sub,单条件选择语句,Private Sub Text1_Change() Text2.Text = End Sub,单条

4、件选择语句,块结构条件语句（多行IF语句） 语法格式为： If Then 语句序列1 Else 语句序列2 End If 示例7：用多行IF语句改写示例3 Command1_Click() 。 Private Sub Command1_Click() Dim x As Single, y As Single x= Val(Text1.Text) If x=0 Then y=1+x Else y=1-2*x End If Text2.Text = y End Sub,教材示例4-2,例2 在一个文本框内输入一段文本，在另一个文本框中输出该文本的所有数字字符，并分别统计数字字符及非数字字符的个数。

5、,IIF函数,IIf函数可用来执行一些简单的条件判断操作，其语法格式为： IIf(,) 功能：对进行测试，若成立（值为真），取第一个值，否则取第二个值 说明： 可以是关系表达式、布尔表达式 m=IIf(,a,b)相当于：If Then m=a Else m=b,单条件选择语句,示例6：用IIF函数改写示例1。 设计步骤如下： 建立应用程序用户界面并设置对象属性，示例3图 编写事件代码 Private Sub Command1_Click() Dim x As Single, y As Single x = Val(Text1.Text) y=IIF(x=0,1+x,1-2*x) Text2.T

6、ext = y End Sub,条件语句的嵌套,在条件语句中，Then 和 Else 后面的语句块也可以包含另一个条件语句，这就形成条件语句的嵌套。一般格式为： If Then If Then End If Else End If,例3,根据不同的时间段发出问候语，如0时12时，显示“早上好”,ElseIf格式,如果出现多层If语句嵌套，将是程序冗长，不便阅读 If Then ElseIf Then ElseIf Then Else End If,例如，程序代码中的嵌套条件语句可改写称如下形式： If h12 Then Print “早上好!” ElseIf h 0 Then Label1.M

7、ove Label1.Left - 20 Else Label1.Left = Form1.ScaleWidth End If End Sub,框架是作为容器放置其他控件对象的控件，将这些控件对象分成可标识的控件组；框架内的所有控件将随框架一起移动、显示和消失。 (框架示例：“幻灯片放映”“设置放映方式”对话框) 示例:控制文本的字体、字号及颜色在窗体上设置3个框架Frame1、Frame2和Frame3,框架控件,选择性按钮,很多应用程序都需要提供选项让用户选择，如选择“是”或“否”，从列表中选择某一项 VB中用于选择的控件有单选按钮、复选框、列表框和组合框，它们都是工具箱中的标准控件,单选

8、按钮, 用途 单选按钮（OptionButton）控件由一个圆圈“”及紧跟它的文字组成，它用于提供“选中”和“未选中”两种可选项。单击可以选中它，此时圆圈中间有一个黑圆点；没有选中时，圆圈中间的黑圆点消失 常用属性, 事件 单选按钮使用最多的是 Click 事件。当运行单击单选按钮，或在代码中改变单选按钮的 Value 属性值为 True，将触发 Click 事件。在应用程序中可以创建一个事件过程，检测控件对象 Value 属性值，再根据检测结果执行相应的处理,例5,设计一个程序，用单选按钮组控制在文本框中显示不同的字体,复选框, 用途 复选框（CheckBox）又称选择框或检查框，它的控件由一个四边形小框和紧挨它的文字组成，它也提供“选中”和“未选中”两种可选项。单击它可以选中它，此时四边形小框出现打