VB选择结构课件.ppt

1 1 第四章选择结构 4 1运算符与表达式4 2顺序结构4 3If语句4 4多条件选择语句4 5选项按钮4 6复选框 2020 3 21 2 2 4 1 1算术运算符与算术表达式 4 1运算符与表达式 两种含义 减法或者取负 求整型除法的余数 2020 3 21 3 3 4 1 2关系运算符与关系表达式 优先级的级别都是相同的 2020 3 21 4 4 进行关系运算时 先算出关系运算符两侧表达式的值 然后再进行比较表达式均为数值型时 按数值大小进行比较表达式是字符串型时 对应的字符按ASCII值进行比较数值型与可转换成数值型的数据比较 按转换后的数值进行比较日期型数据的比较 看成 yyyymmdd 的8位整数单精度数不能直接进行 的比较 计算机中的浮点数的误差 2020 3 21 5 5 4 1 3布尔运算符与布尔表达式 2020 3 21 6 6 4 1 4字符串运算符与字符串表达式 VB只有一种字符串连接符 即连接运算符 字符串表达式的格式为 例如 xyz 123 456 运算结果为xyz123456123 100 运算结果为123100 2020 3 21 7 7 4 1 5运算符的优先顺序 2020 3 21 8 8 求表达式Not8 6Or6 5And5 3 10的值 1 算术运算 Not8 6Or6 5And8 10 2 关系运算 NotTrueOrTrueAndFalse 3 取反操作 FalseOrTrueAndFalse 4 与操作 FalseOrFalse 5 最后得到 False 2020 3 21 9 判断一个年份是否是闰年 需要满足以下条件 该年份能被4整除但不能被100整除 或该年份能被100整除又能被400整除 设y为年份 条件1 ymod4 0Andymod1000 条件2 ymod100 0Andymod400 0 ymod4 0Andymod1000Orymod100 0Andymod400 0 2020 3 21 10 10 4 2顺序结构 顺序结构是程序中最基本的一种结构 顾名思义是按照顺序向下执行 一条语句执行完毕之后接着执行下一条语句的结构 2020 3 21 11 11 PrivateSubCommand1 Click DimaAsInteger bAsIntegera 12Print a ab 2 aPrint b bEndSub 结果 a 12b 24 2020 3 21 12 12 4 3 1单行选择语句If Then Else 单行选择语句的语法格式为 IfThen语句序列1 Else语句序列2 4 3If语句 条件表达式的结果为一个布尔值 可以是关系表达式 布尔表达式 数值表达式 非0值为True 0为False 字符串表达式 只允许出现包含数字的字符串 2020 3 21 13 13 分析 当x 2时 用公式y x3 9来求y的值 当x 2时 用公式y x2 5x 6来计算y的值 2020 3 21 14 14 2020 3 21 15 15 PrivateSubCommand1 Click DimxAsSinglex Val Text1 Text Ifx 2Theny x 3 9Elsey x 2 5 x 6Text2 Text yEndSub 2020 3 21 16 16 IIF语句也是单条件选择结构语句 其语法格式为 IIF 条件 语句序列1 语句序列2 其中 语句序列1是条件为真时要执行的语句块部分 语句序列2是条件为假时要执行的语句块部分 Ifx 2Theny x 3 9Elsey x 2 5 x 6利用IIF语句可将改其写成如下形式 y IIF x 2 x 3 9 x 2 5 x 6 4 3 2IIF语句 2020 3 21 17 17 其语法格式如下 IfThen Else EndIf 4 3 3块结构条件语句If Then Else EndIf 当If语句中的语句序列要包含多条语句时 采用块结构条件语句 Ifx 2Theny x 3 9Elsey x 2 5 x 6EndIf 块结构中的If语句必须以EndIf结束 2020 3 21 18 18 If语句的嵌套是指语句序列1或语句序列2本身又是一个If语句 语法格式 IfThenIfThenElseEndIfElseEndIf 4 3 4If语句的嵌套 2020 3 21 19 19 2020 3 21 20 20 例 铁路托运行李 从甲地到乙地 规定每张客票托运费计算方法是行李重量不超过50kg时 0 25元 kg 超过50kg而不超过100kg时 其超过部分按0 35元 kg收费 超过100kg时 其超过部分按0 45元 kg收费 编写程序 输入行李重量 计算并输出托运的费用 分析 设行李重量为wkg 应付运费为x元 则运费公式为 2020 3 21 21 21 PrivateSubCommand1 Click DimwAsSingle xAsSinglew Val Text1 Text Ifw 50Thenx 0 25 wElseIfw 100Thenx 0 25 50 0 35 w 50 Elsex 0 25 50 0 35 50 0 45 w 100 EndIfEndIfText2 Text xEndSub 2020 3 21 22 22 多层的If语句嵌套格式使程序冗长复杂 ElseIf语句的语法格式如下 IfThen 语句序列1 ElseIfThen 语句序列2 Else 语句序列n 1 EndIf 4 3 5ElseIf语句 2020 3 21 23 23 例 4 8 学生成绩采用五分制 成绩小于60分为 不及格 大于等于60小于70为 及格 大于等于70小于80为 中 大于等于80小于90为 良 大于等于90为 优 试编写程序判断某学生的成绩等级 分析 可从文本框1中获取学生成绩 然后进行判断并在文本框2中输出 2020 3 21 24 Ifscore 0Andscore 60Andscore 70Andscore 80Andscore 90Andscore 100Thend 优 Elsed 输入错误 EndIf 2020 3 21 25 a 75Ifa 60thenb 1Ifa 70thenb 2Ifa 80thenb 3Ifa 90thenb 4 a 75Ifa 60thenb 1ElseIfa 70thenb 2ElseIfa 80thenb 3ElseIfa 90thenb 4Elseb 0EndIf 2020 3 21 26 26 语法格式如下 SelectCase Case语句序列1 Case语句序列2 Case语句序列n CaseElse语句序列n 1 EndSelect 4 4多条件选择语句SelectCase 2020 3 21 27 27 2020 3 21 28 28 Case子句中的表达式列表可以有以下几种形式 2020 3 21 29 29 例 4 10 判断某一闰年中任意给定的月份有多少天 分析 在闰年中 2月有29天 1 3 5 7 8 10 12月有31天 其他月份有30天 这是个多个条件的选择问题 用SelectCase语句实现 设计时有文本框1提供月份的输入 文本框2用于输出该月有多少天 点击 判断 按钮进行判断 2020 3 21 30 PrivateSubCommand1 Click DimmAsIntegerm Val Text1 Text SelectCasemCaseIs12Text2 Text 输入错误 Case2Text2 Text 本月有29天 Case1 3 5 7 8 10 12Text2 Text 本月有31天 CaseElseText2 Text 本月有30天 EndSelectEndSub 2020 3 21 31 2 输入3个不同的数 将它们从大到小排序 3 假定每周的工作安排 星期一 三 计算机 星期二 四 高等数学 星期五 英语 星期六 日 休息 输入星期 输出安排 提示 用0 6代表星期日到星期六 1 按下列公式计算Y值 练习 2020 3 21 32 32 4 5选项按钮控件 选项按钮 OptionButton 就是我们通常所说的单选按钮 它的主要功能是提供一组选择 这些选择是互斥的 要求在这些互斥的选择中根据需要选取一个且只能选取一个 常用属性 2020 3 21 33 33 Value属性 选项按钮的Value属性指出是否选定了此按钮 选定时 值将变为True 可在代码中设置选项按钮的Value属性来选定按钮 例如 Option1 Value True要在选项按钮组中设置缺省选项按钮 可在设计时通过设置Value属性 也可在运行时在代码中用上述语句来设置Value属性 2020 3 21 34 34 选项按钮常用的事件是Click GotFocus 获得焦点 LostFocus 失去焦点 事件 常用的方法是SetFocus方法 即让该选项按钮获得焦点 此时其Value值为True 一个选项按钮可以用以下几种方法选择 1 在运行时单击该选项按钮2 用代码使它的Value值为True 即Option1 Value True3 在选项按钮组内使用方向键选择选项按钮 2020 3 21 35 35 Click事件 选定选项按钮时将触发其Click事件 是否有必要响应此事件 这将取决于应用程序的功能 在平常应用中 常常需要几组选项 这就需要创建选项组 要将选项按钮分组 可把它们创建在不同的容器控件中 像Frame控件 Picture控件 运行时 用户在每个选项组中只能选定一个选项按钮 2020 3 21 36 36 例 4 11 利用选项按钮修改文本框中文字的字体 共有宋体 隶书和楷体3中字体 分析 3中字体是互斥的 所以需要使用3个选项按钮Option1 Option3 将其Caption依次修改为宋体 隶书和楷体 此外还有一个文本框用于输入 2020 3 21 37 37 4 6复选框 复选框 CheckBox 也称为检查框 主要功能是提供在多种选择中选择一种 选择两种或选择多种的方法 复选框可以单独使用 也可以成组使用 成组使用时 组内每个复选框是独立的 可以被独立选择 2020 3 21 38 38 复选框常用的属性有 1 Caption属性 显示出现在复选框旁边的文本2 Value属性 0 Unchecked 1 Checked 2 Grayed 分别代表未选定 选定和禁用状态 复选框的常用事件有Click事件 GotFocus和LostFocus事件 2020 3 21 39 39 Value属性 该属性指示复选框处于选定 未选定或禁用状态 灰色的 中的哪一种 有三种设置值 0 Unchecked 1 Checked 2 Grayed 其缺省值是未选定状态 若要预先在一系列复选框中选定若干复选框 则应在Form Load或Form Initialize过程中将Value属性设置为Checked 也可将属性值设置为Grayed以禁用复选框 2020 3 21 40 40 例 4 13 设计一个程序 窗体上包括学生的基本信息 学生可以