1、本网站免费注册后即可以下载，点击开通VIP会员可无限免费下载！
2、资料一般为word或PPT文档。建议使用IE9以上浏览器或360、谷歌、火狐浏览器浏览本站。
3、有任何下载问题，请联系微信客服。
扫描下方二维码，添加微信客服
《2.3.3循环结构》公开课教案优质课下载
、教具VB6.0、广播教学系统课 时1课时教学法讲授法、小组讨论法
导
学
步
骤
导
学
步
骤
教 师 活 动学生活动一、引入新课
提出问题：假设你从今年开始，第一个月为“希望工程”存入1 元钱，第二个月存入2元钱，第三个月存入3元钱……依次类推，两年时间你将为“希望工程”存入多少钱？
二、导议、导悟、
问题的思考：我们假设n 为月数，intSum 是一个累加变量,且初始值为0，那么存入钱的累计数intSum 的计算方法是：
第1个月：n=1,n<=24条件成立，intSum=intSum+n，即intSum=0+1；
第2个月：n=2，n<=24条件成立，intSum=intSum+n，即intSum=1+2；
……
第24 个月：n= 24, n< = 24 条件成立，intSum= intSum+ n，即intSum=276+24；
第25 个月：n=25,n<=24 条件不成立，不再累计。
三、导学
我们发现每次都重复执行intSum=intSum+n 这一语句，像这种需要重复执行某一段代码的程序，需要使用循环结构来实现。VB循环结构常用的语句是For…Next 语句和Do While…Loop 语句等。
1、编写“希望工程储蓄”程序流程图。
2、编写程序：解决问题的完整的程序代码参考如下：
Private Sub cmdOk_Click()
Dim n As Integer, intSum As Integer
intSum = 0