第8章-程序VB循环结构程序设计.ppt

第8章 循环结构程序设计 学习重点 For…Next语句、Do…Loop语句、While…Wend语句、GoTo语句。 循环语句的嵌套使用。 掌握常用的循环结构算法。 本章内容 8.1 For…Next语句 8.2 Do…Loop语句 8.3 While…Wend语句 8.4 GoTo语句 8.5 循环嵌套 8.6 常用算法及实例 本章小结 引言 循环：重复进行某些相同或相近的操作 循环结构语句 ： 程序自动重复执行代码段。 Visual Basic中的循环结构语句： For…Next语句 Do…Loop语句 While…Wend语句 8.1 For…Next语句 For…Next语句（也称步长循环语句） ，常用于在循环开始前能确定循环执行次数的情况。 For…Next语句格式如下：For 循环变量=初值 To 终值 [Step 步长] [语句块] [Exit For] [语句块]Next循环变量 功能：以指定次数来重复执行一组语句。 For 循环变量=初值 To 终值 [Step 步长] [语句块] [Exit For] [语句块]Next循环变量 示例代码 ：Dim i As IntegerFor i=1 To 10 Step 1 Print i ;Next i 执行以上代码将在窗体上输出结果如下：1 2 3 4 5 6 7 8 9 10 关于循环的几个概念： 循环变量——又称为“循环控制变量”、“控制变量”或“循环计数器”，是用做循环计数器的数值变量。这个变量必须为数值型变量，不能是逻辑型数据或数组元素。 循环体 ——被重复执行的代码段。 循环次数——循环体被重复执行的次数。循环次数必须是有限的，否则称程序陷入“死循环” Dim i As IntegerFor i=1 To 10 Step 1 Print i ;Next i 说明： 上述代码中整型变量i是循环变量。 初值、终值和步长也必须是数值表达式。步长可以是正数或负数，仅当步长为1时，“Step 步长”可以省略。当步长是正数或零时，要求循环变量小于或等于终值；当步长是负数时，要求循环变量大于或等于终值。若不符合以上情况时，不能进入循环执行语句块。在上述代码中循环变量i的初值是1，终值是10，步长是1。 Dim i As IntegerFor i=1 To 10 Step 1 Print i ;Next i For和Next中间的语句段称为循环体。在上述代码中循环体仅有一条语句构成。 可以在循环体中任何位置放置任意个Exit For语句，随时退出循环。Exit For经常在条件判断之后使用，如If…Then语句之后，并将控制权转移到紧接在Next之后的语句。如将上述代码改为 Dim i As Integer For i=1 To 10 Step 1 Print i ;  If i5 Then Exit For Next i 程序的输出就变为1 2 3 4 5。 8.1 For…Next语句 For…Next语句执行过程： ① 首先计算初值、终值和步长表达式的值，并将它们都转换成与循环变量相同的类型。 ② 将计算好的初值表达式的值赋给循环变量，作为循环变量的初值，注意循环变量仅被赋初值一次。 ③ 进行判别：判断循环变量的值是否超过终值，即当步长0（步长为正数）时，判别循环变量终值否；当步长0（步长为负数）时，判别循环变量终值否，如果未超过，则进入执行循环体；如果超过了，则正常退出结束循环，去执行Next语句的下一语句。 ④ 执行Next语句，使循环变量增加一个步长，即执行循环变量=循环变量+步长；返回步骤③继续进行判别。 Dim i As IntegerFor i=1 To 10 Step 1 Print i ;Next i 上述代码中循环变量的初值是1，以后每次执行到For语句时判断i=10是否成立，成立则执行循环体中的语句，即输出变量i当前的值，否则结束循环，每次执行到Next语句时将循环变量i的值自增1。因此，循环变量i的值从1一直变化到10，并将这些值输出。最后一次执行过Next语句后，变量i的值是11，因为超出终值而结束循环。 一般地，若循环体中不出现类似于Exit For和Exit Sub之类的强制跳转语句时，结束For循环时循环变量的值肯定超过了终值。 8.1 For…Next语句 循环次数的一般计算公式如下：循环次数=In