《2022年信息技术九年级北师大版分支结构教案》由会员分享,可在线阅读,更多相关《2022年信息技术九年级北师大版分支结构教案(7页珍藏版)》请在金锄头文库上搜索。
1、学习必备欢迎下载【教学目标与知识点】1)掌握和理解选择结构的几种形式2)学会使用选择结构解决问题【教学重点】选择结构的几种形式【教学难点】Selece Case语句形式和选择结构的嵌套使用【教学过程】复习顺序结构:交换两个变量中的数据【流程图】【程序代码】Dim a As Single, b As Single, c As Single a=Val(Inputbox( 请输入 a, 输入框 ) b=Val(Inputbox( 请输入 b, 输入框 ) Print 交换前: a=;a; b=;b c=a a=b b=c Print 交换后: a=;a; b=;b 引入新课:比较上面程序和下面程序
2、的执行结果,比较程序的不同之处。【程序二】Dim a As Single, b As Single, c As Single 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 1 页,共 7 页学习必备欢迎下载a=Val(Inputbox( 请输入 a, 输入框 ) b=Val(Inputbox( 请输入 b, 输入框 ) Print 交换前: a=;a; b=;b If ab Then c=a a=b b=c End if Print 交换后: a=;a; b=;b 【分析】不同之处: 【程序二】中多了以下语句If ab Then End If,这
3、就是本节可我们要学习的选择机构。1、选择结构格式【形式一】单分支选择结构If 条件Then 语句或语句组语句组是指有多条语句的情况End if 说明:如果条件为真就执行语句或语句组中语句,否则继续执行这段程序后面的语句。【例一】【程序代码】a=10 b=20 If a= 60 Then Print 及格 Else Print 不及格 End If 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 2 页,共 7 页学习必备欢迎下载End Sub 运行结果:输入80 显示及格输入 50 显示不及格【形式三】多分支结构If 条件 1 Then 语句或语句
4、组1 ElseIf 条件 2 Then 语句或语句组2 ElseIf 条件 n Then 语句或语句组n Else 语句或语句组n+1 End if 说明:条件1 成立执行语句或语句组1,条件 1 不成立及条件1 成立执行语句或语句组2,依此类推,所有条件都不成立执行语句或语句组n+1。【例三】某次满分100 分的考试中, =90 分显示 “ 优秀 ” , 7590 分显示 “ 良好 ” , 6075 分显示 “ 一般” ,= 90 Then Print 优秀 ElseIf a = 75 Then Print 良好 ElseIf a = 60 Then Print 一般 Else Print
5、不及格 End If 运行结果:输入95 显示优秀输入 85 显示良好输入 70 显示一般输入 50 显示不及格当程序出现多分支结构时,用If 语句比较烦琐,而使用多分支选择结构Selece Case语句就方便多了。【形式四】 Select Case语句Select Case 表达式Case 表达式列表1 语句或语句组1 Case表达式列表2 语句或语句组2 Case表达式列表3 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 3 页,共 7 页学习必备欢迎下载语句或语句组3 Case Else 语句或语句组n End Select 说明:同格式三
6、【例四】题目同【例三】【程序代码】a = Val(InputBox( 请输入考试分数, 输入框 ) Select Case a Case Is = 90 Print 优秀 Case Is = 75 Print 良好 Case Is = 60 Print 一般 Case Else Print 不及格 End Select 运行结果:同例三2、课堂练习【课堂练习一】输入3 个不相同的数,求出其中的最小数。精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 4 页,共 7 页学习必备欢迎下载【流程图】【程序代码】Private Sub Form_Click() Dim a As Single, b As Single, c As Single, min As Single a = Val(InputBox( 请输入 a, 输入框 ) b = Val(InputBox( 请输入 b, 输入框 ) c = Val(InputBox( 请输入 c, 输入框 ) Print 输入的 3 个数分别为 ; a; b; c If a b Then min = a Else min = b End If If c 16.67飞船挣脱太阳引力飞出太阳系精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 7 页,共 7 页