高中信息技术-VB中的IF语句应用教案

1、VB中的IF语句应用用VB编程实现锤子、剪刀、布游戏、基本说明教学内容1）教学内容所属模块：算法与程序设计2）年级：高二年级4）课时数：1节二、教学设计1、教学目标：让学生亲身编写一个儿时玩过的锤子、剪刀、布游戏程序来感受计算机程序解决问题的过程，了解用高级语言编程工具解决问题的基本方法，特别是熟练掌握IF语句的应用，感悟计算机程序设计的思想，了解计算机程序设计的基本流程，激发学生对信息技术的求知欲，提高其学习兴趣，形成积极主动学习信息技术的态度。2、内容分析：本节课的内容结构是：首先请每相邻的2个同学一起玩儿时的锤子、剪刀、布游戏，并简单介绍玩的方法，然后老师演示VB做好的锤子、剪刀、布游戏

2、小程序，让学生了解计算机程序的工作流程。通过解剖这段程序让学生了解程序设计的基本思想和流程。在学生练习中，让学生编写运行程序，亲身感受计算机程序解决问题的过程。重点难点分析：（1）教学重点：在高级语言环境中编写并执行一段程序代码，了解其工作过程VB中的IF语句、以及随机函数（2）教学难点：剖析程序，了解其结构组成和具体作用，认识计算机程序设计的基本流程熟练掌握VB中的IF语句、以及随机函数的使用如何把简单的游戏过程转化为计算机容易解决的编程方法上3、学情分析：高一年级学生在进校后，我们曾做过调查，在信息技术学科中虽然只有少部分学生是“零起点”，但一般学生只停留在使用电脑的层面，而且对以前学过的

3、知识掌握的较差。因此，在教学设计中使用学生们儿时玩过的游戏来学习和加深分支语句的使用，就是从学生的认知特点和学生已有的知识经验及能力水平出发，自然的引导进入计算机编程解决问题的方法和流程，这样更符合学生的认知特点，引入课题更加自然，说明问题更加清楚，同时也简化了“算法”的概念。4、设计思路：1、教学方法设计在教学中选用了学生儿时玩过的锤子、剪刀，布游戏为例子，通过学生玩游戏的方法和步骤，引导出计算机解决问题的方法和步骤，即“算法”。教学中采用了“活动式”、“启发式”、“探究式”、“任务驱动式”等教学模式。在教学设计中安排大量的尝试性、探索性的活动，引导学生积极主动地完成学习任务。逐步建立起自主

4、性和研究性的学习模式，从而更加突出学生在教学过程中的主体地位。教学中还安排大量的实践性、操作性的内容，使学生在具体活动中理解信息技术的基本知识，掌握信息处理的基本技能，并能够灵活应用到学习和生活中。2、关于教学流程和教学活动的设计三、教学过程描述每2个学生玩锤子、剪刀、布游戏执行VB编写的锤子、剪刀、布游戏小程序，让学生了解计算机程序的工作过程如何玩这个游戏的，得出每次出都是随机让学生们总结游戏方法和步骤，分析如何用计算机编程实现由玩游戏的方法和步骤引导出计算机解决问题的方法的步骤，即“算法”剖析部分程序，让学生举一反三学生上机练习评论交流学生作品教学总结让学生更深的感受编程解决问题的能力教学

5、环节及时间教师活动学生活动对学生学习过程的观察和考查设计意图引入课题（3分钟）要求玩儿时游戏演示VB样例程序每2个同学玩游戏观察VB样例程序引导学生对比人和计算机玩游戏引入课题提出问题（2分钟）在VB中如何编写这个程序呢？学生讨论，互相探讨听学生讨论，引导学生得出“随机”思想进入主题1教与学的过程描述分析问题（5分钟）得出随机思想，提出如何转化为计算机容易解决的模式学分讨论如何转化模式？听学生讨论，引导学生分析，得出转化方法得出程序设计思路剖析程序（10分钟）理顺思路，剖析程序，熟悉流程师生互动，理顺思路，观察学生，看其能否与教师互动，跟上教师的思维分析思路剖析程序上机练习（20分钟）辅导学生

6、上机练习安排能力好的同学帮助有困难的同学学生设计界面、编写代码、调试代码辅导学生上机练习，观察学生谁做出了好的作品，解决学生的疑难点互助协作评价交流（3分钟）对好的作品进行评价，对出现的错误进行分析看老师演示作品相互交流作品观察学生，看其对自己的作业是否满意，是否有成就感相互交流总结（2分钟）一起总结这个程序的编程思想和流程和老师一起回顾并总结看学生在老师的引导下能不能自己总结出来回顾总结感悟提升（1分钟）让学生使用准备好的VB开发的程序和软件，让学生对程序解决问题有更深的了解。学生自己运行程序，更深的感受程序设计的魅力观察学生，看其运行了实用程序后，有何反应激发学生学习程序设计的兴趣2、关键

7、环节提炼（1）引入：以儿时所玩的锤子、剪刀、布游戏为背景，从演示VB编写的锤子、剪刀、布游戏程序入手，能立即唤起学生求知欲望，产生学习兴趣。（2）剖析：这一环节的流程如图所示：玩游戏的方法和步骤计算机如何解决这样的问题算法的概念学生玩游戏的方法、步骤体现的数学思维是计算机程序设计的基础，我利用对比的方法，从人机对话的角度，逐句剖析计算机编写的锤子、剪刀、布游戏程序（见程序剖析实例），让学生了解其结构组成和具体作用，懂得计算机程序设计的基本思想：按照人类解决问题的思维方法，进行人机对话。计算机能够听懂的“话”，就是我们输入的命令。这样，就有利于消除计算机编程的神秘感，激发学生学习计算机编程的兴趣

8、。首先，这个程序中人和计算机每次都有3种出牌的可能，那么如何编写程序最方便呢？（引导学生思考？）我们就把这3个图片形象的用3个数字来代替，这样就使我们的编程更容易实现。因此，我们这样进行约定：1fXrQt11了JV7锤子，用数字“1”表示剪刀，用数字“3”表示布，用数字“3”表示这里提问让学生思考，这个约定一定要唯一吗？要注意什么？（讨论）程序剖析实例：（以人出锤子为例）Dimsum,w,d,LAsIntegerPrivateSubCommand1_Click()Dimx,yAsIntegersum=sum+1RandomizeTimerx=Int(3*Rnd)+1y=1lmage4.Pict

9、ure=Imagel.Picture'定义变量，sum表示总局数，w表示你赢的局数，d表示平局数，L表示你输的局数'定义变量，x表示电脑出的数字，y表示你出的数字'随机函数初始化'电脑随机出数（1，2，3任选其一）'我出的数字（锤子）显示我出数字所对应图片'计算机出的和你相同'你出锤子，计算机出剪刀Ifx=yThenLabel3.Caption="平局”Image5.Picture=Image1.Pictured=d+1EndIfIfx=2ThenLabel3.Caption=”你赢了！”Image5.Picture=Image

10、2.Picturew=w+1EndIfIfx=3Then'你出锤子，计算机出布Label3.Caption=”你输了！”lmage5.Picture=lmage3.PictureL=L+1EndIfText1.Text=sumText2.Text=wText3.Text=dText4.Text=LEndSub通过上述分析，让同学们思考讨论如何编写另外2段程序？（3）体验：教学中安排了“编程实现”一个小节让学生经历和体验程序设计的过程，设计“界面设计”、“代码编写”、“调试运行”三个环节。结合学生的实际情况，组织学生实施上述三个环节的学习、体验。首先将引入课题时运行的锤子、剪刀、布游戏程

11、序提供给学生们，让其观看界面的设计。要求学生在老师完成一部分程序后，举一反三，自己动手编写所有的程序，亲身感受计算机程序解决问题的过程。（4）评价和交流：在整个教学过程中，都注重教室和学生、学生和学生的交流互动。如，在剖析程序时，要求学生与玩游戏时解决同类问题比较，在“编程实现”过程中，教师进行有目的的分层指导，让完成“任务”的学生通过“广播教学”给其他同学做示范，并介绍经验、体会，教师及时进行点评，其他同学提出补充或修改意见。通过交流互动，实现知识“共享”，共同体高。（4）总结提升：在“编程实现”的基础上，让学生自己使用老师提供的其他VB开发的实用程序，教师引导学生讨论，使学生认识到用计算机

12、编程可以帮助我们解决很多的问题：不但能解决锤子、剪刀、布小游戏问题，还能解决更大更复杂的问题，如office就可以用VB开发出来的，更深刻的感受程序解决问题的魅力。认识到计算机解决问题和人解决问题一样需要有清晰的解题步骤。而对于计算机而言，这种解题步骤就称为算法。计算机编程解决问题的过程分析问题设计算法*编写程序调试运行检测结果附：教学资源、学生学习过程及典型成果（可选）制作界面:程序运行界面:完整程序代码：Dimsum,w,d,LAsIntegerPrivateSubCommand1_Click()Dimx,yAsIntegersum=sum+1RandomizeTimerx=Int(3*R

13、nd)+1y=1lmage4.Picture=Imagel.PictureIfx=yThenLabel3.Caption="平局”Image5.Picture=Imagel.Pictured=d+1EndIfIfx=2ThenLabel3.Caption=”你赢了！”Image5.Picture=Image2.Picturew=w+1EndIfIfx=3ThenLabel3.Caption=”你输了！”Image5.Picture=Image3.PictureL=L+1EndIfText1.Text=sumText2.Text=wText3.Text=dText4.Text=lEnd

14、SubPrivateSubCommand2_Click()Dimx,yAsIntegersum=sum+1RandomizeTimerx=Int(3*Rnd)+1y=2Image4.Picture=Image2.PictureIfx=yThenLabel3.Caption="平局”Image5.Picture=Image2.Pictured=d+1EndIfIfx=1ThenLabel3.Caption=”你输了！”Image5.Picture=Image1.PictureL=L+1EndIfIfx=3ThenLabel3.Caption=”你赢了！”lmage5.Picture=lmage3.Picturew=w+1EndIfText1.Text=sumText2.Text=wText3.Text=dText4.Text=LEndSubPrivateSubCommand3_Click()Dimx,yAsIntegersum=sum+1RandomizeTimerx=Int(3*Rnd)+1y=3Image4.Picture=Image3.PictureIfx=yThenLabel3.Caption="平局”Image5.Picture=Image3.Pictured=d+1