第2章第三节 选择结构 教案

文档属性

名称 第2章第三节 选择结构 教案
格式 zip
文件大小 503.0KB
资源类型 教案
版本资源 沪教版
科目 信息技术(信息科技)
更新时间 2017-12-29 14:47:02

图片预览

文档简介

第2章第三节 选择结构
一、教材分析:
本节课的内容结构是:首先请每相邻的2个同学一起玩儿时的锤子、剪刀、布游戏,并简单介绍玩的方法,然后老师演示VB做好的锤子、剪刀、布游戏小程序,让学生了解计算机程序的工作流程。通过解剖这段程序让学生了解程序设计的基本思想和流程。在学生练习中,让学生编写运行程序,亲身感受计算机程序解决问题的过程。
二、教学重点、难点:
(1)教学重点:
在高级语言环境中编写并执行一段程序代码,了解其工作过程
VB中的IF语句、以及随机函数
(2)教学难点:
剖析程序,了解其结构组成和具体作用,认识计算机程序设计的基本流程
熟练掌握VB中的IF语句、以及随机函数的使用
如何把简单的游戏过程转化为计算机容易解决的编程方法上
4、设计思路:
1、教学方法设计
在教学中选用了学生儿时玩过的锤子、剪刀,布游戏为例子,通过学生玩游戏的方法和步骤,引导出计算机解决问题的方法和步骤,即“算法”。教学中采用了“活动式”、“启发式”、“探究式”、 “任务驱动式”等教学模式。
在教学设计中安排大量的尝试性、探索性的活动,引导学生积极主动地完成学习任务。逐步建立起自主性和研究性的学习模式,从而更加突出学生在教学过程中的主体地位。教学中还安排大量的实践性、操作性的内容,使学生在具体活动中理解信息技术的基本知识,掌握信息处理的基本技能,并能够灵活应用到学习和生活中。
三、教学过程描述
1.教与学的过程描述
教学环节及时间
教师活动
学生活动
对学生学习过程的观察和考查
设计意图
引入课题(3分钟)
要求玩儿时游戏
演示VB样例程序
每2个同学玩游戏
观察VB样例程序
引导学生对比人和计算机玩游戏
引入课题
提出问题(2分钟)
在VB中如何编写这个程序呢?
学生讨论,互相探讨
听学生讨论,引导学生得出“随机”思想
进入主题
分析问题(5分钟)
得出随机思想,提出如何转化为计算机容易解决的模式
学分讨论如何转化模式?
听学生讨论,引导学生分析,得出转化方法
得出程序设计思路
剖析程序(10分钟)
理顺思路,剖析程序,熟悉流程
师生互动,理顺思路,
观察学生,看其能否与教师互动,跟上教师的思维
分析思路
剖析程序
上机练习(20分钟)
辅导学生上机练习
安排能力好的同学帮助有困难的同学
学生设计界面、编写代码、调试代码
辅导学生上机练习,观察学生谁做出了好的作品,解决学生的疑难点
互助协作
评价交流
(3分钟)
对好的作品进行评价,对出现的错误进行分析
看老师演示作品
相互交流作品
观察学生,看其对自己的作业是否满意,是否有成就感
相互交流
总结
(2分钟)
一起总结这个程序的编程思想和流程
和老师一起回顾并总结
看学生在老师的引导下能不能自己总结出来
回顾总结
感悟提升
(1分钟)
让学生使用准备好的VB开发的程序和软件,让学生对程序解决问题有更深的了解。
学生自己运行程序,更深的感受程序设计的魅力
观察学生,看其运行了实用程序后,有何反应
激发学生学习程序设计的兴趣
关键环节提炼
(1)引入:
以儿时所玩的锤子、剪刀、布游戏为背景,从演示VB编写的锤子、剪刀、布游戏程序入手,能立即唤起学生求知欲望,产生学习兴趣。
(2)剖析:
这一环节的流程如图所示:
学生玩游戏的方法、步骤体现的数学思维是计算机程序设计的基础,我利用对比的方法,从人机对话的角度,逐句剖析计算机编写的锤子、剪刀、布游戏程序(见程序剖析实例),让学生了解其结构组成和具体作用,懂得计算机程序设计的基本思想:按照人类解决问题的思维方法,进行人机对话。计算机能够听懂的“话”,就是我们输入的命令。这样,就有利于消除计算机编程的神秘感,激发学生学习计算机编程的兴趣。
首先,这个程序中人和计算机每次都有3种出牌的可能,那么如何编写程序最方便呢?(引导学生思考?)
我们就把这3个图片形象的用3个数字来代替,这样就使我们的编程更容易实现。
因此,我们这样进行约定:

锤子,用数字“1”表示
剪刀,用数字“3”表示
布,用数字“3”表示
这里提问让学生思考,这个约定一定要唯一吗?要注意什么?(讨论)
程序剖析实例:(以人出锤子为例)
Dim sum, w, d, L As Integer ‘定义变量,sum表示总局数,w表示你赢
的局数,d表示平局数,L表示你输的局数
Private Sub Command1_Click()
Dim x, y As Integer ‘定义变量,x表示电脑出的数字,y表示你出的数字
sum = sum + 1
Randomize Timer ‘随机函数初始化
x = Int(3 * Rnd) + 1 ‘电脑随机出数(1,2,3任选其一)
y = 1 ‘我出的数字(锤子)
Image4.Picture = Image1.Picture ‘显示我出数字所对应图片
If x = y Then ‘计算机出的和你相同
Label3.Caption = "平局"
Image5.Picture = Image1.Picture
d = d + 1
End If
If x = 2 Then ‘你出锤子,计算机出剪刀
Label3.Caption = "你赢了!"
Image5.Picture = Image2.Picture
w = w + 1
End If
If x = 3 Then ‘你出锤子,计算机出布
Label3.Caption = "你输了!"
Image5.Picture = Image3.Picture
L = L + 1
End If
Text1.Text = sum
Text2.Text = w
Text3.Text = d
Text4.Text =L
End Sub
通过上述分析,让同学们思考讨论如何编写另外2段程序?
(3)体验:
教学中安排了“编程实现”一个小节让学生经历和体验程序设计的过程,设计“界面设计”、“代码编写”、“调试运行”三个环节。结合学生的实际情况,组织学生实施上述三个环节的学习、体验。首先将引入课题时运行的锤子、剪刀、布游戏程序提供给学生们,让其观看界面的设计。要求学生在老师完成一部分程序后,举一反三,自己动手编写所有的程序,亲身感受计算机程序解决问题的过程。
(4)评价和交流:
在整个教学过程中,都注重教室和学生、学生和学生的交流互动。如,在剖析程序时,要求学生与玩游戏时解决同类问题比较,在“编程实现”过程中,教师进行有目的的分层指导,让完成“任务”的学生通过“广播教学”给其他同学做示范,并介绍经验、体会,教师及时进行点评,其他同学提出补充或修改意见。通过交流互动,实现知识“共享”,共同体高。
(4)总结提升:
在“编程实现”的基础上,让学生自己使用老师提供的其他VB开发的实用程序,教师引导学生讨论,使学生认识到用计算机编程可以帮助我们解决很多的问题:不但能解决锤子、剪刀、布小游戏问题,还能解决更大更复杂的问题,如office就可以用VB开发出来的,更深刻的感受程序解决问题的魅力。认识到计算机解决问题和人解决问题一样需要有清晰的解题步骤。而对于计算机而言,这种解题步骤就称为算法。
计算机编程解决问题的过程

附:教学资源、学生学习过程及典型成果(可选)
制作界面:
程序运行界面:

完整程序代码:
Dim sum, w, d, L As Integer
Private Sub Command1_Click()
Dim x, y As Integer
sum = sum + 1
Randomize Timer
x = Int(3 * Rnd) + 1
y = 1
Image4.Picture = Image1.Picture
If x = y Then
Label3.Caption = "平局"
Image5.Picture = Image1.Picture
d = d + 1
End If
If x = 2 Then
Label3.Caption = "你赢了!"
Image5.Picture = Image2.Picture
w = w + 1
End If
If x = 3 Then
Label3.Caption = "你输了!"
Image5.Picture = Image3.Picture
L = L+ 1
End If
Text1.Text = sum
Text2.Text = w
Text3.Text = d
Text4.Text = l
End Sub
Private Sub Command2_Click()
Dim x, y As Integer
sum = sum + 1
Randomize Timer
x = Int(3 * Rnd) + 1
y = 2
Image4.Picture = Image2.Picture
If x = y Then
Label3.Caption = "平局"
Image5.Picture = Image2.Picture
d = d + 1
End If
If x = 1 Then
Label3.Caption = "你输了!"
Image5.Picture = Image1.Picture
L = L + 1
End If
If x = 3 Then
Label3.Caption = "你赢了!"
Image5.Picture = Image3.Picture
w = w + 1
End If
Text1.Text = sum
Text2.Text = w
Text3.Text = d
Text4.Text =L
End Sub
Private Sub Command3_Click()
Dim x, y As Integer
sum = sum + 1
Randomize Timer
x = Int(3 * Rnd) + 1
y = 3
Image4.Picture = Image3.Picture
If x = y Then
Label3.Caption = "平局"
Image5.Picture = Image3.Picture
d = d + 1
End If
If x = 1 Then
Label3.Caption = "你赢了!"
Image5.Picture = Image1.Picture
w = w + 1
End If
If x = 2 Then
Label3.Caption = "你输了!"
Image5.Picture = Image2.Picture
L= L+ 1
End If
Text1.Text = sum
Text2.Text = w
Text3.Text = d
Text4.Text = L
End Sub
Private Sub Command4_Click()
End
End Sub