选修《选择结构程序》课件高中信息技术

上传人:宝路 文档编号:48718919 上传时间:2018-07-20 格式:PPT 页数:39 大小:824.02KB
返回 下载 相关 举报
选修《选择结构程序》课件高中信息技术_第1页
第1页 / 共39页
选修《选择结构程序》课件高中信息技术_第2页
第2页 / 共39页
选修《选择结构程序》课件高中信息技术_第3页
第3页 / 共39页
选修《选择结构程序》课件高中信息技术_第4页
第4页 / 共39页
选修《选择结构程序》课件高中信息技术_第5页
第5页 / 共39页
点击查看更多>>
资源描述

《选修《选择结构程序》课件高中信息技术》由会员分享,可在线阅读,更多相关《选修《选择结构程序》课件高中信息技术(39页珍藏版)》请在金锄头文库上搜索。

1、 程序流程有三种最基本的控 制结构,即顺序结构、选择结构 和循环结构。在一个过程中,程序通常是按 照由上而下的顺序来执行各个语 句的,直到整个过程结束。引入 选择结构和循环结构,可以改变 程序执行的流程。选择程序结构用于判断给定的条件判断给定的条件,根据判断的结判断的结 果果来控制程序的流程 本章主要内容条件表达式 关系表达式 / 逻辑表达式条件语句 If.Then / If.Then.Else条件语句的嵌套多分支语句 select case 选择性控件 单选按钮 / 复选框列表框/组合框计时器控件程序举例关系运算符符号: 大于 =大于或等于 不等于 适用的类型和结果类型:关系运算符适用于数值

2、型、字符型、日期型和逻辑型数据,结果只能为逻辑型(真值True和假值False) 运算符两侧必须是同类型的量或表达式若不是,系统会自动进行强制类型转换“5”4 0(10)若判断的结论是成立,则结果为逻辑真值(True),否则为逻辑假值(False)True的值等于-1,False的值等于0关系运算符运算 符名 称示 例说 明大于0(10)值为:True,强制转换为 数值型 =大于或等 于“aa”=“ab ”值为:False=等于1=True值为:False,强制转换为 数值型 1值为:False关系表达式运算次序:先分别求出运算符两侧表达式的值,然后再将二者进行比较 其中:数值型数据按照数值大

3、小比较2+36 3=0 5“2” “a” “a”日期型数据按照前后顺序比较#01/01/2003# # 12/31/2002# 关系表达式的格式: 关系表达式练习数值型数据按照数值大小比较字符型数据按照字符的ASCII码值大小比较日期型数据按照前后顺序比较 ?2/33/42/33/4 ?“a” “b” ?“a” “b” ?3“b” AND 12 False ?“a”“b” OR 111False ?233 AND 510False 表示一个数是偶数x Mod 2=0 或 int(x/2)=x/2 表示一个数X能被3或5或7整除x Mod 3=0 OR x Mod 5=0 OR x Mod 7=

4、0 表示身高不在1.65米以上或不是女生身高1.65 OR 性别“女”NOT(身高1.65 AND 性别“女”)布尔表达式练习 ?321False a=3:b=4:c=5?a=b=cFalse 表示一个数x是能被3整除的奇数x Mod 3=0 and x Mod 20x Mod 2=1 and x Mod 20 表示一个数x2,5 x2 and x5 表示一个数x不在2,5区间内x2 or x5运算符的优先顺序算术运算符字符串运算符:关系运算符:、布尔运算符:NotAndOr优 先 级 依 次 降 低运算符的优先顺序练习设变量设变量x=4x=4,y=-1y=-1,a=7.5a=7.5,b=-6

5、.2b=-6.2,求表达式求表达式x+yx+y a+ba+b And Not y0 ) OR (y Mod (y Mod 4=0 AND y Mod 1000 ) OR y Mod (y Mod 4=0 AND y Mod 1000 x0 ThenThen Label1.Caption=x Label1.Caption=x问题:如果不是 正数,应该显示 “不是正数”语句格式: IF THEN ELSE 执行过程:判断给定的条件如果成立(其值为True),执行所给语句序列1,然后执行下一条语句否则(其值为False),执行所给语句序列2,然后执行下一条语句选择结构(IF-THEN-ELSE)条件

6、命令序列1命令序列2下一语句NY(IF-THEN-ELSE)举例例二:根据用户输入的一个成绩,判断是否及格Dim x As SingleDim x As SingleX=X=Val(InputBoxVal(InputBox(“(“请输入一个成绩:请输入一个成绩:“,“,“输入输入“,0)“,0)IFIF X=60X=60 THEN THEN Label1.Caption=“Label1.Caption=“及格及格” Else Else Label1.Caption=“Label1.Caption=“不及不及格格”使用使用IIFIIF函数,也可以实现相应的判断函数,也可以实现相应的判断格式:格式

7、:IIF(IIF(条件,条件为真时的值,条件为假时的值条件,条件为真时的值,条件为假时的值) ) 例一:输入一个数,如果是正数,就输出;否则显示非正数Dim x As Singlex=Val(Text1.text)If x0 Then Label1.Caption=x Else Label1.Caption= “非正数“IIF函数的使用Dim x As Singlex=Val(Text1.text)IfIf x0x0 ThenThen Label1.Caption=xLabel1.Caption=x ElseElse Label1.Caption= “Label1.Caption= “非正数非

8、正数”Label1.Caption=Label1.Caption=IIf(xIIf(x0,x,“0,x,“非正数非正数”) )Dim x As SingleDim x As SingleX=X=Val(InputBoxVal(InputBox(“(“请输入一个成绩:请输入一个成绩:“,“,“输入输入“,0)“,0)IFIF X=60X=60 THENTHEN Label1.Caption=“Label1.Caption=“及格及格” ElseElse Label1.Caption=“Label1.Caption=“不及不及 格格”Label1.Caption=Label1.Caption=II

9、f(xIIf(x=60,“=60,“及格及格”,“,“不及格不及格”) )语句格式: IF THEN ELSE END IF 执行过程:判断给定的条件如果成立(其值为True),执行所给y语句序列1,然后执行下一条语句否则(其值为False),执行所给语句序列2,然后执行下一条语句块结构(IF-THEN-ELSE-END IF)条件命令序列1命令序列2下一语句NY(IF-THEN-ELSE-END IF)举 例示例:根据用户输入的一个成绩,判断是否及格Dim x As SingleDim x As Singlex=x=Val(InputBoxVal(InputBox(“(“请输入一个成绩请输入

10、一个成绩:“, “:“, “输入输入“, 0)“, 0)If If x = 60 x = 60 ThenThenLabel1.Caption = “ Label1.Caption = “及格及格“ “ElseElseLabel1.Caption = “ Label1.Caption = “不及格不及格“ “End IfEnd If(IF-THEN-ELSE-END IF)举 例示例:输入ABC的值,判断能否构成三角形,如果能,计算三 角形的面积Dim a As Single, b As Single, c As SingleDim a As Single, b As Single, c As

11、Single a=Val(Text1.Text):b=Val(Text2.Text):c=Val(Text3.Text)a=Val(Text1.Text):b=Val(Text2.Text):c=Val(Text3.Text) s=(a + b + c) / 2s=(a + b + c) / 2 If If a+ba+bc And c0 And c And c0 And a+ca+cb And b0 And b And b0 And b+cb+ca And a0 a And a0 ThenThen area = area = Sqr(sSqr(s * (s - a) * (s - b) * (

12、s - c) * (s - a) * (s - b) * (s - c) Label1.Caption=“Label1.Caption=“能构成三角形能构成三角形,“&“,“&“三角形面积为:三角形面积为:“&“&Str(areaStr(area) ) ElseElse Label1.Caption=“Label1.Caption=“不能构成三角形不能构成三角形“ “ End IfEnd If语句格式: IF THEN ELSEIF THEN ELSEEND IF END IF说明:如果在If语句的语句列1或语句列2中又有一个完整的If语句,则称为If语句的嵌套IF语句的嵌套条件1语句列1语句

13、列2下一语句NY条件2YN语句列3嵌套IF举例用户输入一个数,如果是正数,打印是个正数; 如果是0,打印是个零;如果是负数,打印是负数X0是个 正数 是零下一语 句X0YN是个 负数YNDim x As Single x = Val(Text1.Text) If x 0 Then Label1.Caption = “正数“ ElseIf x = 0 Then Label1.Caption = “零” ElseLabel1.Caption = “负数“End If End If嵌套IF举例用户输入一元二次方程的系数,用户判断解的情况0有两个不相 同的实根 有两个相同 的实根下一语 句0YN没有实

14、 数解YNa=Val(Text1.Text):b=Val(Text2.Text):c=Val(Text3.Text)d=b2-4*a*cIf d 0 ThenLabel1.Caption = “不同实根 “ElseIf d = 0 Then Label1.Caption = “相同实根 “ ElseLabel1.Caption = “没有实数解“End IfEnd If嵌套IF举例用户输入一个成绩, 若在90到100之间,打印优秀; 若在80到89之间,打印良好; 若在70到79之间,打印一般; 若在60到69之间,打印及格; 若在60以下,打印不及格; 其它情况,打印输入有误Dim x As

15、 SingleDim x As Single x = Val(Text1.Text)x = Val(Text1.Text) If x 100 ThenIf x 100 ThenLabel1.Caption = “ Label1.Caption = “输入有误!输入有误!“ “ ElseElseIf x = 90 Then If x = 90 ThenLabel1.Caption = “ Label1.Caption = “优秀!优秀!“ “Else ElseIf x = 80 Then If x = 80 ThenLabel1.Caption = “ Label1.Caption = “良好!良好!“ “Else ElseIf x = 70 Then If x = 70 ThenLabel1.Caption = “ Label1.Caption = “一般!一般!“ “Else ElseIf x

展开阅读全文
相关资源
正为您匹配相似的精品文档
相关搜索

最新文档


当前位置:首页 > 高等教育 > 大学课件

电脑版 |金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号