第6章 VB控制结构4.ppt

第6章 VB控制结构 沈阳理工大学应用技术学院 0.本章内容 选择控制结构 多分支控制结构 选择控件——复选框和单选按钮 计时器控件 循环控制结构 多重循环 GoTo型控制 选择控件——列表框与组合框 滚动条和框架控件 1.选择控制结构 If...Then语句 格式： If 条件 Then 语句 或If 条件 Then 语句块 End If 功能：若条件成立(值为真)，则执行Then后面的语句或语句块，否则直接执行下一条语句或“End If”的下一条语句 1.选择控制结构 例如：如果满足条件CJ＜60时，打印出“成绩不及格”，采用的条件语句是： If CJ60 Then Print 成绩不及格 多行代码： If CJ60 Then Print 成绩不及格 Print 请准备补考 End If 1.选择控制结构 If...Then ...Else语句 格式： If 条件 Then 语句块1 (A) Else 语句块2 (B) End If 功能：首先测试条件(E)，如果条件成立(即值为真)，则执行Then后面的语句块1，如果条件不成立(即值为假)，则执行Else后面的语句块2。而在执行Then或Else之后的语句块后，会从End If之后的语句继续执行。 1.选择控制结构 【例1】输入三个数a、b、c，求出其中最大数 1.选择控制结构 【例2】输入三个数，将它们从大到小排序 1.选择控制结构 IIf函数 格式： IIf(条件，条件为真时的值，条件为假时的值) 功能：对条件进行测试，若条件成立(为真值)，则取第一个值(即“条件为真时的值”)，否则取第二个值(即“条件为假时的值”)。 例如，将a、b中的小数，放入Min变量中： Min=IIf(a＜b,a,b) 1.选择控制结构 ElseIf格式 格式： If 条件1 Then 语句块1 ElseIf 条件2 Then 语句块2 ElseIf 条件3 Then 语句块3 …… ［Else 语句块n］ End If 1.选择控制结构 【例3】输入学生成绩(百分制)，判断该成绩的等级(优良、中、及格、不及格) 2.多分支控制结构 格式： Select Case 表达 Case 表达式表1 语句块1 ［Case 表达式表2 语句块2］ . . . ［Case Else 语句块n］ End Select 功能：先计算表达式的值，然后将该值依次与结构中的每个Case的值进行比较，如果该值符合某个Case指定的值条件时，就执行该Case的语句块，然后跳到End Select，从End Select出口。如果没有相符合的Case值，则执行Case Else中的语句块 2.多分支控制结构 表达式表通常是一个具体值(如Case 1)，每一个值确定一个分支。还有三种方法可以确定设定值： 一组值(用逗号隔开)。示例： Case 1,3,5 ′表示条件在1，3，5范围内取值 表达式1 TO 表达式2。示例： Case 60 To 80 ′表示条件取值范围为60～80  Is关系式。示例： Case Is5 ′表示条件在小于5范围取值 2.多分支控制结构 【例4】输入学生成绩(百分制)，判断该成绩的等级(优良、、及格、不及格) 用Select Case语句来实现 3.选择控件——复