- 1
- 0
- 约5.68千字
- 约 7页
- 2024-10-26 发布于河南
- 举报
【教学目标与知识点】
1)掌握和理解选择结构的几种形式
2)学会使用选择结构解决问题
【教学重点】选择结构的几种形式
SeleceCase
【教学难点】语句形式和选择结构的嵌套使用
【教学过程】
复习顺序结构:交换两个变量中的数据
【流程图】
【程序代码】
DimaAsSingle,bAsSingle,cAsSingle
a=Val(Inputbox(a,))
请输入输入框
b=Val(Inputbox(b,))
请输入输入框
Printa=;a;b=;b
交换前:
c=a
a=b
b=c
Printa=;a;b=;b
交换后:
引入新课:比较上面程序和下面程序的执行结果,比较程序的不同之处。
【程序二】
DimaAsSingle,bAsSingle,cAsSingle
a=Val(Inputbox(a,))
请输入输入框
b=Val(Inputbox(b,))
请输入输入框
Printa=;a;b=;b
交换前:
IfabThen
c=a
a=b
b=c
Endif
Printa=;a;b=;b
交换后:
IfabThen……EndIf
【分析】不同之处:【程序二】中多了以下语句,这就是本节可我们要学习的
选择机构。
1、选择结构格式
【形式一】单分支选择结构
If条件Then
语句或语句组语句组是指有多条语句的情况
Endif
说明:如果条件为真就执行语句或语句组中语句,否则继续执行这段程序后面的语句。
【例一】
【程序代码】
a=10
b=20
IfabThen
a=20
b=10
Endif
Printa;b
【形式二】双分支选择结构
If条件Then
语句或语句组1
Else
语句或语句组2
Endif
说明:如果条件成立就执行语句或语句组1中的语句,条件不成立就执行语句或语句组2中的语
句。
10060“”“”
【例二】某次满分分的考试中,输入考试分数,大于等于分显示及格否则显示不及格。
【程序代码】
PrivateSubCommand1_Click()
a=Val(InputBox(,))
请输入考试分数输入框
Ifa=60Then
及格
Else
不及格
EndIf
EndSub
运行结果:输入80显示及格
输入50显示不及格
【形式三】多分支结构
If条件1Then
语句或语句组1
ElseIf2Then
条件
语句或语句组2
……
ElseIfnThen
条件
语句或语句组n
Else
语句或语句组n+1
Endif
11112
说明:条件成立执行语句或语句组,条件不成立及条件成立执行语句或语句组,依此
类推,所有条件都不成立执行语句或语句组n+1。
100=90“”7590
原创力文档

文档评论(0)