资源简介

中小学教育资源及组卷应用平台
xx中等职业技术学校
课程名称 Visual Basic 程序设计 教师姓名
课题名称 5.1选择结构程序设计 课型 新授
授课班级 授课时间 课时 2
教学目标 知识目标 1.了解选择程序的条件表达式2.掌握选择结构的IF语句格式
能力目标 学会IF语句的程序运算能做IF的程序填空
情感、态度、价值观目标 在学习知识的同时学习程序员应具备的严谨态度
教学重点 1.条件表达式的运算IF语句的格式
教学难点 表达式的优先级别对结果的影响
教学方法 讲授法、练习法
教学用具 计算机 VB6.0软件
过程 教学内容与教师活动 学生活动 教学意图
导入 思考：今天的早餐吃油条还是包子？先写数学作业还是先踢球？请问上面的问题在做什么？ 引导学生说出做选择，引出课题。
新授 呈现概念：什么是选择结构：选择结构是一种常用的基本结构，是计算机科学用来描述自然界和社会生活中分支现象的重要手段。其特点是：根据所给定的条件为真（即条件成立）与否，而决定从各实际可能的不同分支中执行某一分支的相应操作，并且任何情况下总有：“无论分支多寡，必择其一；纵然分支众多，仅选其一”的特性条件表达式：关系表达式 〈表达式1〉〈关系运算符〉〈表达式2〉[〈关系运算符〉〈表达式3〉…] （1）3 < 6，值为True （2）8 <= 5，值为False （3）3 > 2，值为True （4）2 >= 3，值为False （5）2 = 3，值为False （6）"a" <> "b"，值为True （7）3 * 4 < 1 + 2，值为False2、布尔表达式abNot aa And ba Or bTrueTrueFalseTrueTrueTrueFalseFalseFalseTrueFalseTrueTrueFalseTrueFalseFalseTrueFalseFalse3. 格式 If <条件> Then [<语句组1>] [Else <语句组2>]4. 功能 如果<条件>成立，则执行<语句组1>否则执行<语句组2> 说明(1) <条件> 可以是：●关系表达式●布尔表达式●数值表达式：0为False；非0为True●字符串表达式： "0"为False；非"0"为True(2) 可以没有Else部分，这时必须有<语句组1>。T语句组1条件？F例: If X<>"aaa" Then Print X 记笔记，理解IF语句条件，计算结果运算程序，输出图形记笔记补充笔记 讲授知识，补充课本内容帮助学生掌握程序重点，突破难点利用软件输出图形，证明程序运行的过程
练习 下列程序的功能是求：2+4+6+…+100的程序，请在横线上填写适当的内容使程序完整。Private Sub Command1_Click() Dim s&,i% ______S=0____ For i=1 to 100_IF I MOD 2=0 THEN_____________S=_S+I_____End if__NEXT i________Print ＂s=＂;sEnd Sub 思考答案，完成程序填空，并本程序的功能 提高难度，掌握学生掌握程度
小结 什么是条件表达式？选择结构的格式和运动规则是怎样的？ 整理笔记 总结重点
安全教育 网络安全不可放松，争做网络安全小卫士，从自身做起
布置作业 下面程序的功能是计算1!+3!+5!+…+19！请补充完整。Private Sub Form_Click()DIM SUM&, JC&,I%，J%SUM=0FOR I=1 TO 19 STEP 2【8】__________FOR J=1 TO【9】__________JC=JC*JNEXT J【10】__________【11】__________PRINT ＂1!+3!+5!+...+19!=＂;SUMEnd Sub
教学反思 在学习中应该及时检查学生笔记，尤其在练习过程中，对于补充内容作为重点，练习时经典题型一定要做多做精。做好归纳总结。
4(共10张PPT)
第5章
选择结构程序设计
选择结构是一种常用的基本结构，是计算机科学用来描述自然界和社会生活中分支现象的重要手段。其特点是：根据所给定的条件为真（即条件成立）与否，而决定从各实际可能的不同分支中执行某一分支的相应操作，并且任何情况下总有：“无论分支多寡，必择其一；纵然分支众多，仅选其一”的特性。
第5章 选择结构程序设计
条件表达式
1
简单条件选择结构的程序设计
2
多分支条件选择结构的程序设计
3
计时器控件Timer
4
单选钮控件OptionButton
5
复选框控件CheckBox
6
5.1 条件表达式
5.1.1 关系表达式
〈表达式1〉〈关系运算符〉〈表达式2〉[〈关系运算符〉〈表达式3〉…]
（1）3 < 6，值为True
（2）8 <= 5，值为False
（3）3 > 2，值为True
（4）2 >= 3，值为False
（5）2 = 3，值为False
（6）"a" <> "b"，值为True
（7）3 * 4 < 1 + 2，值为False
5.1.2 布尔表达式
（1）Not (1 > 0)，值为：False
（2）Not ("a" <>"a")，值为：True
（3）2 > 3 And 1 < 2，值为：False
（4）2 > 3 Or 1 < 2，值为：True
a b Not a a And b a Or b
True True False True True
True False False False True
False True True False True
False False True False False
5.1.3 运算符的优先顺序
VB表达式2 + 3 > 1 + 4 And Not 6 < 8的值。
① 算术运算： 5 > 5 And Not 6 < 8
② 关系运算： False And Not True
③ 非运算： False And False
④ 结果： False
优先顺序 运算符类型 运 算 符 运算符类型 运 算 符
1 算术运算符 ^（指数） 字符串运算符 &（字符串连接）
2 –（负数） 3 *、/（乘法和除法） 4 \（整除） 5 Mod（求模） 6 +、–（加法和减法） 7 关系运算符 =、<>、<、>、<=、>= 8 布尔运算符 Not 9 And 10 Or 返回目录
综合练习
3*3^2+2*8/4+3^2
-3+5>1 and 3>0
3>2*6 or 5=7 and 6>7 or 7>8
设 a=5,b=4,c=3,d=2
表达式3>2*b or a=c and b<>c or c>d的值
5.2 简单条件选择结构的程序设计
5.2.1 单行结构条件语句
If〈条件〉Then [〈语句组1〉] [ Else〈语句组2〉]
Private Sub Command1_Click()
Dim x As Integer
x = Val(Text1.Text)
If x Mod 2 = 0 Then Label2.Caption = "偶数" Else Label2.Caption = "奇数"
End Sub
Private Sub Command2_Click()
Text1.Text = ""
End Sub
Private Sub Command3_Click()
Unload Me
End Sub
5.2.2 多行结构条件语句
If〈条件〉Then
〈语句组1〉
[Else
〈语句组2〉]
End If
Private Sub Command1_Click()
Dim x As Single, y As Single
x = Val(Text1.Text)
y = Val(Text2.Text)
If x < y Then
t = x : x = y : y = t
End If
Label3.Caption = "较大数为" & Str(x)
End Sub
Private Sub Command1_Click()
Dim x As Single, y As Single
x = Val(Text1.Text)
y = Val(Text2.Text)
If x < y Then
Label3.Caption = "较大数为" & Str(y)
Else
Label3.Caption = "较大数为" & Str(x)
End If
End Sub

展开更多......

收起↑