第四章 VB循环结构一、根本说明教学内容1〕教学内容所属模块：高中信息技术根底 2〕年级： 高一3〕所用教材出版单位：上海科技教育出版社 4〕所属的章节：第四章 程序的设计 5〕所用软件：Vasual basic6〕学时数：两课时(连堂课)3、教学目标：掌握For-Next语句的格式和功能，理解For-Next语句的执行过程，学会使用For-Next语句实现计数循环掌握Do While-Loop语句的格式和功能，会使用Do While-Loop语句实现条件循环4、教学重点： 分别用For-Next语句和Do While-Loop语句来编写程序5、教学难点：掌握For-Next语句和Do While-Loop语句的相同和不同之处.6、学情分析：在程序设计方面，学生的学习能力和接受能力差异较大，上这课的时候我主要采用了分组学习结合课堂练习的方式来教学的，在作业布置方面，我注意难易结合，让学生选做自己能完成的题目，这样根底差的学生能顺利完成任务，好的学生也能从中找到乐趣7、教学思路：程序设计是一门比拟枯燥的课程，但是当你进入其中之后，你也会觉得其乐无穷，我的目的就是至少让一局部的学生能感受到其中的乐趣。
所以我往往以实践的例子导入新课，引起学生的兴趣和思考在讲语句的应用上，就细讲，让学生充分理解其中的原理，再通过举例举一反三，让学生熟悉的同时思考其中的一些重要的细节，最后在作业的布置上，设置等级式的题目让学生选择，保证每个学生都能完成任务，获得成就感三、教学过程 教学程序教师引导学生活动创设情景引入新课〔5〕播放一段跑步的Flash动画，切入主题，引入循环结构〔相同之处：重复〕每跑一圈200米，当没有超过800米时，重复再跑一圈，直到到达800米才停止这种重复的过程就是我们今天要学的循环结构循环结构就是重复执行某一过程的结构语句 但这种重复需要满足某一条件，当超出了条件的范围时就退出循环体以动画导入以引起学生的兴趣，并帮助很好的理解循环结构的概念分组学习〔8〕一、学生看流程图，理解什么是循环结构，了解For-Next语句和Do While-Loop语句的格式1、For...Next循环的一般形式是： For 循环变量=初值 To 终值 Step 循环变量增量 循环体 Next 循环变量其中要重复执行的操作称为循环体 2、Do...Loop循环一般形式是： Do While 条件循环体Loop二、用For-Next语句写出上面的跑歨的程序。
教师点拨：可设一个变量i, i的初值为200，终值为800，步长为200，设变量s为跑歨的总和，的初值为1学生完成不了也没有关系，可通过下面的举例来让学生具体的了解其实施过程源代码参考：dim s as interger dim i, as interger s=1 for i=200 to 800 step 200 s=s+I next I print “s=〞; s学生自学，画出上面的跑歨的程序的流程图并尝试用For-Next语句写出上面的跑歨的程序例举实例，理解for……next语句的用法〔12〕举例：求s=1+2+3+……+n来说明for……next语句的用法 分析：1、 n为键盘输入数据，可用语句n=inputbox(“……〞)来实现2、 该题为一个加法的重复，首先s=1+2=3s=3+3=sum+3=6s=6+4=sum+4……sum=sum+n→得出循环体3、 加数的规律：每次增加1，假设设一个变量a, a的初值设为1，每加一次a自增1,当a超过n 的值时退出循环体源代码参考： dim sum,i,n as interger n=inputbox(“请输入一个整数给n) sum=0 for I=1 to n sum=sum+I next I print sum学生思考：n,用什么语句来实现？循环体是什么？变量的初值和终值可设为多少？在VB中实践讨论与思考〔2〕1、 本例中循环结束时，循环变量i的值是多少？2、 假设有如下一段代码：For j=15 to 3 Step –2 Print jNext j 那么循环结束时，循环变量j的值是多少？3、循环变量的增量能否为0，如果为0，运行结果怎样？帮助学生更好的理解变量在循环过程中的应用和变化实例改写，理解Do While-Loop语句的用法〔5〕接下来我们就来学习Do While-Loop语句。
要求用Do While-Loop语句改写上一个例子通过改写让学生更好的理解了这两种语句的相同和不同之处源代码参考： dim sum,i,n as interger n=inputbox(“请输入一个整数给n) sum=0 I=1 do while I<=n sum=sum+I I=I+1Loopprint sum学生思考:1、Do while 后的条件是什么？2、i=i+1写在循环体前面和后面有什么区别?让学生通过在VB中实践来解决该问题深入举例，深化Do While-Loop语句的应用〔10〕例：编写求下式中n最大值的程序，画出流程图1+2+3+……+n<=1000分析：由于该例是求n的最大值，所以不能用for……next语句那么用Do While-Loop语句重要的是要知道do while后的循环执行的条件是什么？源代码参考： dim s as integer dim n as integer n=0 do while s<=1000 n=n+1 s=s+n*n loop print “n=〞; n-1学生思考:1、该例可用for……next语句来实现吗？ 不能for……next语句为计数语句，它必须知道变量的终值是多少才可用。
2、do while后的循环执行的条件是什么？3、为什么最后输出n的值时是n-1?课堂作业〔可选〕〔20—40〕1、 s=1*2*3*4……*n2、 s=1-1/2+1/3-1/4+1/5……+1/99-1/100〔提示：用什么方法可以在循环中轮换加减?〕3、 剧场要安排1000个座位，第一排有30个座位，以后每排增加2个座位这1000个座位最多能排几排？最后剩余不够的一排的座位有几个？如果按前边的排法把最后一排补齐，整个剧场共有多少个座位？〔提示：用do while loop语句〕通过设置三个级别的练习题让学生选择，很好地解决了学生的差异性，使差一点的学生能完成该内容的任务，好的学生能深入思考，从中得到学习的乐趣作业讲评对完成较快的学生和小组当堂给与表扬课后认真批改作业，将作业答案〔源代码〕和做得好的同学的作业放入学习网站供学生交流和参考表扬和成绩更能鼓励学生的学习兴趣和创造精神很多学生往往会选难一点的题目来完成，而不愿局限于简单的完成任务同时很多学生把VB界面做得很整齐和美观教学反思：我对这堂课的反思是： 教师要想组织好一堂课，必须精心设计课堂，把活动安排得更细致，并要考虑周全。
最重要的是要引起学生的极大兴趣，这就需要教师有非常好的引导，并在过程中给予学生帮助与指导课前要分析教材教法，了解学生情况，有的放矢，注意差异性教学，这样才能取得良好的效果同时，VB程序教学的实践非常重要，要在源程序代码的实践中要从多方面变化写法，比方初值为0和为1的写法会有什么不同，I=I+1写在循环体前面和后面对最后的结果会有什么影响等等，这样便于让学生理解更常深入理解程序内在的逻辑性。