第二节 设计打地鼠游戏课时教学设计
课题
第二节 设计打地鼠游戏
单元
第三单元
学科
信息技术
年级
八年级
学习
目标
了解打地鼠的核心功能是什么。
掌握Image、Timer和Form使用技巧。
重点
了解角色跟随鼠标移动的实现方法
难点
掌握Image、Timer和Form使用技巧。
教学过程
教学环节
教师活动
学生活动
设计意图
导入新课
视频导入。
2、提问?
打地鼠，商场里经常看到。游戏规则比较简单，打中随机出现的地鼠就能得分，那么，VB能否设计一个打地鼠游戏呢？
通过视频打地鼠游戏引出VB如何编写打地鼠小程序的游戏。
通过平常生活例子导入激起学生的创作欲望。
讲授新课
一、打地鼠游戏初级版
1、功能分析
你认为打地鼠游戏程序应该包含哪些基本功能？
打地鼠程序最核心的角色是：地鼠和锤子
地鼠：动作交替出现或隐藏。
锤子：动作就是移动和击打地鼠，击打就是单击鼠标。
2、界面分析
涉及控件对象：Image、Timer和Form
3、代码分析
地鼠的出现与隐藏，由Timer事件控制，地鼠出现与隐藏交替变换代码： ds.Visible=False
4、调试程序
打地鼠游戏升级版
1、1.1.0版本打地鼠游戏
1.1.0版本：打中地鼠可以得到1分。
计分变量Sum。当击中地鼠中，加一个计数器语句:
Sum=Sum+1
并在Label控件将分数显示出来。
实践：
（1）根据李鸣的想法，完成1.1.0版本的打地鼠游戏。
根据自己的想法，增加一些控件游戏的控件，使游戏功能更加多一些。完成1.x.x版本的打地鼠游戏。
2、2.0.0版本打地鼠游戏
通过ds控件的Left和Top属性值的修改，使地鼠能在不同的地方出现。
dd(x).Picture=em.Picture。增加了一个em控件，Picture属性为空白。
3、2.1.0版本打地鼠游戏
同时出现多只地鼠，方法就是在出现打地鼠的代码中增加一个记次循环，通过循环执行随机地鼠出现的语句。以达到出现多只地鼠的效果。
探究：
在连续击中地鼠时，如何实现奖励分数翻倍？
你还能想到一些什么新的功能来增加游戏的趣味性？
添加询问语句，如：
课后习题:
（1）以下叙述中错误的是 (C)
A）Visual Basic 是事件驱动型可视化编程工具
B）Visual Basic应用程序不具有明显的开始和结束语句
C）Visual Basic工具箱中的所有控件都具有宽度（Width）和高度（Height）属性
D）Visual Basic中控件的某些属性只能在运行时设置
2、将定时器的时间间隔设置为1秒，那定时器的Interval属性值应为(A)。
A．1000??B．1??C．100???D．10
3、当设置了定时器的有关属性后，使窗体自动向下移动的语句是Move（C）。
?A．Left，Top+100???B．Top+100??
?C．Top-100?? D．Top=Top+100
分析打地鼠游戏的基本功能和核心及设计界面。
明白不同版本的打地鼠游戏。
了解1.1.0版本的打地鼠游戏。
实践练习
了解2.0.0版本。
2.1.0版本的打地鼠游戏与前两种版本的区别。
通过探究加深掌握打地鼠游戏的程序编写与修改。
初步了解打地鼠游戏额原理。
掌握与理解
讲练结合，对比应用，营造课堂气氛，学以致用。
激发兴趣。
课堂小结
打地鼠程序最核心的角色是：地鼠和锤子。
2、地鼠出现与隐藏交替变换代码:ds.Visible=False
学生回答
利用问题形式进行总结，看看学生的掌握情况。
板书
一、打地鼠游戏初级版。
二、打地鼠游戏升级版。
1、1.1.0版本打地鼠游戏
2、2.0.0版本打地鼠游戏
3、2.1.0版本打地鼠游戏
课件21张PPT。 第二节 设计打地鼠游戏粤教版 八年级下新知导入 打地鼠，商场里经常看到。游戏规则比较简单，打中随机出现的地鼠就能得分，那么，VB能否设计一个打地鼠游戏呢？新知导入若想用VB设计打地鼠游戏，需思考以下3个问题：
1、打地鼠的核心功能是什么？
2、如何从核心的功能开始增加游戏的复杂度和可玩性？
3、做的打地鼠游戏能吸引其他同学来玩吗？
新知讲解 1、功能分析一、打地鼠游戏初级版 你认为打地鼠游戏程序应该包含哪些基本功能？ 打地鼠程序最核心的角色是：地鼠和锤子
地鼠：动作交替出现或隐藏。
锤子：动作就是移动和击打地鼠，击打就是单击鼠标。新知讲解 2、界面分析 初级版打地鼠界面中，涉及控件对象：Image、Timer和Form。新知讲解 3、代码分析 地鼠的出现与隐藏，由Timer事件控制，地鼠出现与隐藏交替变换代码：
ds.Visible=False 4、调试程序新知导入关于软件的版本号主版本号：功能模块有大变动。
次版本号：次版对应的只是局部变动。局部变动造成和以前版本不能兼容。
修订版本号：局部变动，主要是局部函数的功能改进，或者bug的修正，或者功能的扩充。新知讲解 二、打地鼠游戏升级版 1、1.1.0版本打地鼠游戏 1.1.0版本：打中地鼠可以得到1分。
计分变量Sum。当击中地鼠中，加一个计数器语句:
Sum=Sum+1
并在Label控件将分数显示出来。新知讲解（1）根据李鸣的想法，完成1.1.0版本的打地鼠游戏。新知讲解（2）根据自己的想法，增加一些控件游戏的控件，使游戏功能更加多一些。完成1.x.x版本的打地鼠游戏。新知讲解 方法一：
通过ds控件的Left和Top属性值的修改，使地鼠能在不同的地方出现。 2、2.0.0版本打地鼠游戏
新知讲解 方法二：
在12个地洞上分别建立12个image控件，命名为dd(0)—dd(11)，然后，地鼠出现的代码也从原来的ds.Visible=True变成
dd(x).picture=ds.Picture
而隐藏则变成了dd(x).Picture=em.Picture。增加了一个em控件，Picture属性为空白。新知讲解 同时出现多只地鼠，方法就是在出现打地鼠的代码中增加一个记次循环，通过循环执行随机地鼠出现的语句。以达到出现多只地鼠的效果。 3、2.1.0版本打地鼠游戏
新知讲解（1）在连续击中地鼠时，如何实现奖励分数翻倍？
将a=a+1改为a=a*a新知讲解（2）你还能想到一些什么新的功能来增加游戏的趣味性？
添加询问语句，如：
课后习题（1）以下叙述中错误的是 (C)
A）Visual Basic 是事件驱动型可视化编程工具
B）Visual Basic应用程序不具有明显的开始和结束语句
C）Visual Basic工具箱中的所有控件都具有宽度（Width）和高度（Height）属性
D）Visual Basic中控件的某些属性只能在运行时设置 课后习题2、将定时器的时间间隔设置为1秒，那定时器的Interval属性值应为(A)。
A．1000??B．1??C．100???D．10
3、当设置了定时器的有关属性后，使窗体自动向下移动的语句是Move（C）。
?A．Left，Top+100???B．Top+100??
?C．Top-100?? D．Top=Top+100课堂总结 1、打地鼠程序最核心的角色是：地鼠和锤子。
2、地鼠出现与隐藏交替变换代码:ds.Visible=False板书设计一、打地鼠游戏初级版。
二、打地鼠游戏升级版。
1、1.1.0版本打地鼠游戏
2、2.0.0版本打地鼠游戏
3、2.1.0版本打地鼠游戏
谢谢21世纪教育网（www.21cnjy.com) 中小学教育资源网站 有大把高质量资料？一线教师？一线教研员？
欢迎加入21世纪教育网教师合作团队！！月薪过万不是梦！！
详情请看：
https://www.21cnjy.com/help/help_extract.php
