VB程序的基本结构——循环结构之For-Next语句

课题：程序的基本结构——循环结构之For-Next语句第课时课型：新授备课教师授课时间

教学目标

知识与技能

1、了解循环的概念，理解循环结构的基本思想

2、掌握For-Next语句的基本结构的写法循环变量，初值，终值和步长。

3、理解For-Next语句的执行过程

过程与方法

1.通过分析问题，能准确找出循环变量、确定循环结束条件。

2.能利用For-Next语句解决简单的问题。

情感态度与价值观

1.通过编写循环结构的程序，体会循环结构的执行过程。

2.通过利用循环思想解决问题，体会循环思想的重要性。

教学重点1、理解循环结构的基本思想

2、理解For-Next语句的执行过程

教学难点根据需要采用循环结构解决实际问题，并提炼出for语句的基本结构学生理解For-Next语句的执行过程

教学

准备

几个以For-Next语句组成的不同功能的程序

教学过程设计教学

内容师生教学活动设计

备注栏

（学生笔记栏）

一、设疑导入

同学们，请先看这个图形(在窗体左边输出显示

竖行排列的1，2，3，4，5)，如果用以前学过的程

序设计语言怎样来编写它的程序呢？

生（稍做思考，然后回答)：使用Print语句

P rint“1”

Print“2”

Print“3”

Print“4”

Print“5”

师：同学们做得很好，，如果想要显示1-10，或是1-100的数字呢？怎么做，难道就这样顺序写下去吗？这样编写是不是太繁琐了。如果能让计算机去完成这部分重复的内容，而我们只要告诉计算机重复操作的次数就可以了，这个愿望能否实现呢？

通过我们今天学习的FOR—NEXT循环语句，就可以很容易的实现这个想法。

二、探索新知

直接在vb 中修改刚才的程序，并通过流程图和表格详细讲解该程序的循环执行过程，让学生了解初值，终值,步长和循环体语句的变化。

程序代码：

Private Sub cmd_start_Click()

Dim i As Integer ‘定义变量i 为整型

For i = 1 To 5 Step 1 ‘设置循环变量，起始为1，终止到5，步长为1 Print i ‘打印变量值 Next i End Sub

师：循环结构也称重复结构，它的作用是使一段程序能重复执行，被重复执行的部分称为循环体。但重复一般都是有条件的，即在满足FOR 语句中的条件下才执行循环体，否则退出循环体。现在我们一起利用表格更直观的观察循环的执行过程。

循环次数

变量i 循环体内语句

1 1 打印i 的值

2 2

3 3

4 4 5

i=i+1

【探索·实践】

请大家自己根据前面所学，总结FOR/NEXT 语句的语句格式：并与小组其他成员讨论程序的执行过程

For <循环变量>= <初值> To <终值> [step <步长>]

<循环体>

Next <循环变量>

【知识点拨】

1) 步长值可以为正数或者负数，当步长为1时，STEP 1可省略不写；

2)循环体语句中可以含有任意多条语句，也可无任何语句，称为空循环；

3) 循环体语句可以含有循环结构；

4) For—Next必须成对出现

5）有时需中途退出循环，这时用EXIT FOR命令。

三、排疑·解错

1、在VB窗体显示输出1到10这十个数字。

分析此循环语句中，循环变量是（）

初值是（）终值是（）步长是

（）循环体中的语句是（），

请尝试写出运行结果

（）。

(提示，直接在VB中验证答案)

2、小组内任意抽取1个程序讨论，分析对错，并说明错误原因

四、实践探究（任选一任务程序完成，）备注一：加粗显示为错误原因，学案端不显示答案。

1、打印1~5这5个数Dim i As Integer

For i = 1 To 5 Step -1 Print i

Next i

End Sub

[步长应为1] 2、打印5~1这5个数

Dim n As Integer

For n=5 to 1

Print n

Next i

[步长为－1，不能省，应for

n=5 to 1 step?1]

3打印1~5这5个数

Dim n As Integer

For n=1 to 5

Print “n”

Next n

[n加上引号，就变成了字符

串，应把引号去掉]

5)打印1~5这5个数

Cls

Dim n As Integer

For n=1 to 5

Print n

[FOR与NEXT必须成对出现，不能缺省]

6)打印1~5这5个数

Cls

Dim n As Integer

For 1 to 5

Print n

Next

[循环变量n要赋值，for n=1 to 5]

1、分析下列程序，说出程序功能，交尝试在表格中写出循环变量的值及程序的变化过程。

Dim x As Integer s=0

For i=1 to 100 s=s+i Next i print s

功能：求1到100的累加和 2、分析下列程序，说出程序功能 Cls

Dim i As Integer for i=20 to 10 step-2 print i next i

功能：输入出20,18,16,14,12,10六个数 3、编程，竖排输出1~10的偶数 4、编程，求100以内的奇数 5、编程，s=1*3*5*......*101

五、拓展提高

通过分析老师给出的提示代码，尝试将下面程序补充完整,思考如何通过循环内嵌套循

环来完成一些复杂的程序设计？

六、自我检测 ，这节课我学会了什么？

课 后 反 思

课间游戏要安全，上下楼梯不打闹。

循环次数

变量i 求和表达式 值(s) 1 1 s=s+1 1 2 s=s+2 3 3 s=s+3

i=i+1

s=s+i