vb程序设计语言与程序设计第4章.ppt
Visual Basic程 序 设 计山东外贸职业学院山东外贸职业学院E-mail：信息管理系信息管理系 柳淑花柳淑花第2页第第4 4章章 选择结构选择结构本章主要内容1、程序控制结构概述程序控制结构概述2、If 语句语句3、Select Case语句语句作业作业 本章小结本章小结退出退出第3页 根据结构化程序设计的要求，程序的基本结构根据结构化程序设计的要求，程序的基本结构根据结构化程序设计的要求，程序的基本结构根据结构化程序设计的要求，程序的基本结构 有三种：有三种：有三种：有三种：（1）顺序结构）顺序结构 （2）分支结构（选择结构）分支结构（选择结构）（3）循环结构（当型循环和直到型循环）循环结构（当型循环和直到型循环）三种基本结构的共同特点：三种基本结构的共同特点：三种基本结构的共同特点：三种基本结构的共同特点：（1）单入口，单出口；）单入口，单出口；（2）结构中的每个部分都有可能被执行；）结构中的每个部分都有可能被执行；（3）在给出）在给出合理的条件合理的条件后，结构内不存在死循环。后，结构内不存在死循环。4.1 4.1 程序控制结构概述程序控制结构概述上一页上一页下一页下一页返回本章首页返回本章首页第4页AB顺序结构顺序结构条件AB真假分支结构分支结构 各种结构的流程图各种结构的流程图各种结构的流程图各种结构的流程图上一页上一页下一页下一页返回本章首页返回本章首页第5页条件ATrueFalse条件AFalseTrue当型循环当型循环直到型循环直到型循环循环结构循环结构上一页上一页下一页下一页返回本章首页返回本章首页第6页1、IfThen 语句（单分支）语句（单分支）单行形式：单行形式：If Then 块形式：块形式：If Then End If4.2 4.2 If 语句语句False条件ATrue上一页上一页下一页下一页返回本章首页返回本章首页第7页2、IfThen Else 语句语句（双分支）（双分支）单行形式：单行形式：单行形式：单行形式：If Then Else 块形式：块形式：块形式：块形式：If Then Else End If 例题例题例题例题1 1：判断数的奇偶性判断数的奇偶性判断数的奇偶性判断数的奇偶性 条件AB真假第8页3 3、If If 语句的嵌套语句的嵌套语句的嵌套语句的嵌套 （多分支）（多分支）（多分支）（多分支）If If 条件条件1 Then1 Then If If 条件条件2 Then2 Then Else Else End If End If ElseElse If If 条件条件3 Then3 Then End If End If End If End If 举例应用见：举例应用见：P50 50 P53 53 P55 55 上一页上一页下一页下一页返回本章首页返回本章首页第9页 If 条件条件1 Then 语句块语句块A1 ElseIf 条件条件2 Then 语句块语句块A2 ElseIf 条件条件3 Then 语句块语句块A3 Else 语句块语句块A n+1 End If 4、IfThen ElseIf 语句语句（多分支）（多分支）举例应用见：举例应用见：举例应用见：举例应用见：P56 56 条件条件1条件条件2条件条件3A1A2A3TrueFalseTrueFalseTrueFalse多分支结构上一页上一页下一页下一页返回本章首页返回本章首页第10页4.3 Selece Case 4.3 Selece Case 语句语句Select Case Select Case 测试表达式测试表达式 Case Case 表达式表达式1 1 语句块语句块1 1 Case Case 表达式表达式2 2 语句块语句块2 2 Case Else Case Else 语句块语句块n+1n+1 End Select End Select 其中其中:测试表达式可以是：算测试表达式可以是：算术表达式或字符表达式；术表达式或字符表达式；表达式表达式1,表达式表达式2等等是测试项，是测试项，它们可以是：它们可以是：具体值。如：具体值。如：1，2，3 数据范围。如数据范围。如 8 to 20 满足某个判断条件：满足某个判断条件：Is20、Is=90 Text2.Text=“优秀 Case 80 To 89 (Is=80)Text2.Text=“良好”Case Is=70 Text2.Text=“中等 Case Is=60 Text2.Text=“及格”Case Is=30 Text2.Text=“补考”Case Else Text2.Text=“重修 End Select End Sub上一页上一页下一页下一页返回本章首页返回本章首页第13页作业：作业：P61 5、6、7上机实训 实训五上一页上一页下一页下一页返回本章首页返回本章首页第14页本 章 小 结 TabTab、SpcSpc 数据输出数据输出数据输出数据输出 PrintPrint方法方法 位置属性位置属性1、顺序结构：、顺序结构：使用使用“标签标签”控控件输出件输出 数据输入数据输入数据输入数据输入 （1 1）数据输出：）数据输出：Print Print方法方法 对象名对象名.Print Spc(n)|Tab(n).Print Spc(n)|Tab(n)，|；对象名：对象名：窗体、图片框、打印机等对象。窗体、图片框、打印机等对象。使用位置属性使用位置属性使用位置属性使用位置属性 位置属性位置属性CurrentXCurrentX和和CurrentYCurrentY常用来把文本精确地输出常用来把文本精确地输出到窗体、图片框或打印页上。格式：到窗体、图片框或打印页上。格式：对象名称对象名称对象名称对象名称.CurrentX=.CurrentX=x x 对象名称对象名称对象名称对象名称.CurrentY.CurrentY=y y 第15页 使用使用“标签标签”控件的输出控件的输出 标签（标签（LabelLabel）是是VBVB中最常用的输出文本信息的工具，目中最常用的输出文本信息的工具，目前几乎完全取代了前几乎完全取代了PrintPrint方法。方法。（2 2）数据输入）数据输入 A A、使用使用“文本框文本框”控件进行输入控件进行输入 B B、使用使用SetFocus SetFocus 方法，格式为：方法，格式为：对象名对象名.SetFocus.SetFocus C C、与用户交互的函数和过程与用户交互的函数和过程 InputBoxInputBox函数格式：函数格式：变量变量=InputBox=InputBox（,x ,）MsgBoxMsgBox函数和函数和MsgBoxMsgBox过程格式：过程格式：变量变量=MsgBox=MsgBox（,）第16页3、分支结构 单分支：If Then 双分支：If Then Else 多分支：If Then ElseIf EndIf Select Case End Select上一页上一页返回本章首页返回本章首页退出退出
