VB课件含具体例子第6章选择结构程序设计幻灯片.pptVIP

新编Visual Basic程序设计教程 第6章 选择结构程序设计 本章重点： 1. If语句的几种格式 2．Select Case 语句的格式 课件内容 作业解答 本章内容： 6.1 If语句 6.1.1 If...Then结构 6.1.2 If...Then...Else结构 6.1.3 If...Then…ElseIf结构 6.1.4 If语句的嵌套 6.2 IIf函数 6.3 Select Case语句 6.1 If语句 引言 来自英文语言习惯 If I win the game ,then I am a hero. If a ,then b, else c 注1：条件表达式的值为True或False，一般是逻辑或关系表达式，也可以是算术表达式（转换为逻辑值） 6.1.1 If...Then结构 两种格式： 格式1： If 条件表达式 Then 语句体 End If 格式2： If 条件表达式 Then 语句体 条件表达式 语句体 T F 注2：当条件为True时执行语句体，否则执行If语句的下一条语句 注3：语句体中可以是多条语句，当采用格式2时，所有的语句必须写在一行，用冒号隔开语句体中的语句 6.1.1 If...Then结构(续) 例：已知有两数x、y，编程使x中存放较大的数 分析：如果x=y，则不需要做处理 如果xy，则做交换处理 实现： If x y Then temp = x x = y y = temp End If 用格式2描述： If x y Then temp = x:x = y:y = temp 6.1.2 If...Then...Else结构 两种格式： 格式1： If 条件表达式 Then 语句体1 Else 语句体2 End If 格式2： If 条件表达式 Then 语句体1 Else 语句体2 注：当条件为True时执行语句体1，否则执行语句体2 T 条件表达式 语句体1 F 语句体2 6.1.2 If...Then...Else结构(续) [例6-2] 判断文本框中输入的是否是数值型数据。 分析：IsNumeric()函数——判断一个数据是否是数值型数据 Private Sub cmdjudge_Click() If IsNumeric(Text1) Then MsgBox 是数字 Else MsgBox 不是数字 End If End Sub If Optmale = True Then str = str + “我是男生” Else str = str + “我是女生” End If str = str + “，我的爱好有：” If Chk1.Value = 1 Then str = str + Chk1.Caption If Chk2.Value = 1 Then str = str + Chk2.Caption If Chk3.Value = 1 Then str = str + Chk3.Caption MsgBox str 6.1.2 If...Then...Else结构(续) [例6-8] 使用单选按钮和复选框进行选择性别和爱好。 分析：在界面设计中使用框架，性别选择为二选一 ，可以采用双分支结构； 爱好的每一项均为复选框，需要判断是否被选中 性别 爱好 6.1.3 If...Then…ElseIf结构 格式： If 表达式1 Then 语句体1 ElseIf 表达式2 Then 语句体2 …… [Else 语句体n+1] End If 表达式1＝ True 执行语句体1 False 表达式2＝ True 执行语句体2 False 表达式3＝…… Else和If间无空格 6.1.3 If...Then…ElseIf结构(续) F T 表达式1 语句体1 表达式2 语句体2 T F …… 表达式n 语句体n …… F 语句体n+1 …… T 判断的顺序为表达式1、表达式2…… 只有当表达式1为False时才判断表达式2，当表达式1和表达式2都为False时，才判断表达式3， 程序执行语句体n+1的条件为前n个表达式均为False。 6.1.3 If...Then…ElseIf结构(续) 例：已知有两数x、y，编程判断x和y的大小关系 分析：xy