网站大量收购独家精品文档,联系QQ:2885784924

《可移动的风车》参考教案.docVIP

  1. 1、本文档共4页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  5. 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  6. 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  7. 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  8. 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多

PAGE2/NUMPAGES4

可移动的风车

【学情分析】

本部分的教学对象是八年级的学生,并且是对smallbasic有了一定的基础。学生对于动态的编程有浓厚的兴趣,这一节课是学生第一次动手编辑动态动画,以前都是静止的。以任务递进的驱动方式来引导学生,降低了程序的难度,也让学生更容易完成任务,轻松理解本课的重、难点。在教学过程中极大的挖掘学生的探究、创新、合作的能力。同时通过展示评比学生作品、提高学生运用信息的能力,自我表现以及赏析作品的能力,提升信息技术有效课堂教学效率。

【\t/Health/cuxx/_blank教学目标】

1.知识与技能

了解Shapes对象;

了解Program对象;

巩固学习While……Endwhile循环语句;

加强GraphicsWindow对象的了解。

2.过程与方法

能用Shapes对象编写简单的动画程序;

能用Program对象优化动画程序的运行效果;

能用GraphicsWindow对象的优化程序的颜色;

继续学习编写事件驱动程序。

3.情感态度与价值观

通过动态程序的学习,培养学生团队协作精神和创新、探究的能力,激发学习程序的热情和兴趣

【教学重难点】

1.了解Shapes对象,并学会简单的运用

2.了解Program对象,学会Program.Delay优化程序

【教学过程】

一、引入主题—可移动的风车

提问:怎么样制作移动风车,要用什么命令?

直接导入本课重点—Shapes对象,使用Shapes.AddRectangle来画风车的叶子

任务一:画一个不断旋转的风车叶

leaf=shapes.AddRectangle(200,10)

Shapes.Move(leaf,200,200)

i=1

Whiletrue

Shapes.Rotate(leaf,i)

i=i+1

EndWhile

这个任务主要是讲解,学生直接输入,leaf=shapes.AddRectangle(200,10)这个参数可以试着更改

二、发现问题

大家已经发现风车叶旋转的速度太快,如何控制风车叶旋转的速度?

引入Program.Delay(milliSeconds)让程序暂停一会儿

任务二:让风车的速度慢下来

在上个程序中加入Program.Delay(5)

三、提出质疑

如何才能有完整的风车呢?分三个片段来解析这个程序

画静止风车

leaf=shapes.AddRectangle(200,10)

GraphicsWindow.BrushColor=green

base=shapes.AddRectangle(20,130)

Shapes.Move(leaf,200,200)

Shapes.Move(base,290,200)

响应鼠标事件命令,让风车叶片旋转

GraphicsWindow.MouseDown=onkd

i=1

Whiletrue

Shapes.Rotate(leaf,i)

Program.Delay(5)

i=i+1

EndWhile

编写子程序

SubonKD

x=GraphicsWindow.MouseX

y=GraphicsWindow.MouseY

Shapes.Move(leaf,x-100,y)

Shapes.Move(base,x-10,y)

EndSub

任务三:个性风车(小组合作)

(1)将完整的风车程序输入电脑运行,点击鼠标移动风车

(2)修改程序中Program.Delay的参数,控制风车旋转的速度

(3)修改程序,改变风车和背景的颜色

这个任务,教师帮助学生,学生小组团队合作。尽量挖掘学生的潜质

四、成果展示

向全班展示学生的作品,请学生逐一来解决上述三个问题。通过评价激励手段,在展示中,让学生学会找出他人或自己的错误和不足,学会欣赏他人作品,提高鉴赏能力。

五、提升巩固

任务四:加强篇:画一个下落的方块

DD=Shapes.AddRectangle(100,100)

Shapes.Move(DD,200,10)

i=1

Whiletrue

Shapes.______(DD,200,10+___)

Program.Delay(5)

i=i+1

EndWhile

让学生动手完成这个缺失的程序,加强shapes对象的理解

六、总结

Shapes对象(AddRectangle、move、rotate)

Program对象(program.delay)

回顾While……Endwhile/sub……Endsub/GraphicsWindow

【教学反思】

本节课教学:引导学生通过“探”这个过程,“悟”出Shapes、Program对象的任用。本节课,我采用了“任务驱动、发现学习、探求知识、深入领悟”的教学模式,学生在

文档评论(0)

crsky2046 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档