For-next循环..docVIP

For... Next循环语句 For…next循环简称为For循环。它是一种指定循环次数（事先知道循环次数）的循环程序结构。在这种结构中，使用了一个称为循环变量的特殊变量作为计数器，指定它的初始数值，然后每重复执行一次循环，循环变量就会自动增加或减少一个指定的数值(称为步长值)，直到循环变量的改变达到最终的指定值，循环才停止执行。 1．For …Next语句的语法格式 ? For 循环变量=初值 To 终值 [Step步长] ??? ??? [语句块] ??????? [Exit For] Next [循环变量] ? 功能：用来控制重复执行一组语句。指定循环变量以步长为增量，从初值到终值依次取值，并且对于循环变量的每一个值，把语句块执行一次。 说明： （1）关键字For和Next成对出现，For是循环语句的开始，Next是循环语句的终端，必须出现在For语句的后面。在关键字For和Next之间的语句块叫循环体，它们将被重复执行指定的次数，执行的次数由初值、终值、步长值决定。 （2）初值、终值和步长值都是数值表达式，步长值可以是正数，也可以为负数。如果步长值为1，可以省略不写，即系统默认步长值为1。 （3）循环变量为必要参数，是用作循环计数器的数值变量，这个变量不能是数组元素。在循环体内，一般不提倡再给循环变量另外赋值。循环变量从初值开始，逐次按照步长值增加或减少而改变，直到超过终值，这时循环停止执行。这里所说的“超过”有两种含义：即大于或者小于。 （4）初值和终值也都是必要参数。当初值小于终值时，步长值必须是正数；反过来，如果初值大于终值，则步长值必须为负数。 （5）如果循环体中安排了Exit ?For 语句，当程序执行到该语句时直接跳出循环结构，不再执行循环体中Exit For的后续语句（如果有），而是转到Next后面的其他指令继续执行。 （6）Next语句中的[循环变量]可以省略。 ? 2. For... Next语句的执行过程： 进入For...Next循环后，程序按照以下步骤执行： （1）若初值、终值和步长值为表达式，求出它们的值，并保存起来： （2）将初值赋给循环变量； （3）判断循环变量值是否超过终值(初值小于终值，且步长值为正时，指大于终值；初值大于终值且步长值为负时，指小于终值)；超过终值时立即跳出循环，执行Next之后的语句。否则继续执行循环体。 （4）遇到Next语句时，把循环变量的当前值加上步长值后再赋给循环变量。 （5）转到(3)。 执行的流程如图6-1所示。 3. For... Next循环的循环次数 从图6-1可以看出，For循环是先检测，后执行的循环形式。因此在下列2种情况下，循环体不会被执行： （1）初值小于终值，步长值为负数 （2）初值大于终值，步长值为正数 （3）如果初值=终值，不论步长值是正数还是负数，均执行一次循环体后跳出循环。 循环的次数可以用以下公式表示： 循环次数 n = INT（（终值 - 初值）/步长值 + 1） 例如，初值等于1，终值等于10，步长值等于2，则循环次数n为： ?? n = INT ((10 – 1)/2 + 1) = 5 例6-1：课前思考解答方法：用For... Next语句实现 分析：求从1到100共100个数的累加和，共需相加100次。每次数字变化（增值）为1，我们可以用变量S来保存累加和，并赋初值为0；变量k作为循环变量并作为加数（加到s中的数），设置其初值为1，终值为100，步长值为1（可以省略）。 设计步骤 （1）创建一个新工程，在窗体上添加如图6-2所示控件并设置控件属性，各控件属性如表6-1所示。 表6-1 各控件属性设置值 控件名 属性 属性值 Label1 Caption “1+2+3+…+100 =” Text1 Text “”（空白） Command1 Caption “计算” ? 图6-2 程序界面 （2）编写程序代码。双击界面上的命令按钮，打开代码设计窗口给命令控件Command1编写如下代码： ? Private Sub Command1_Click() s = 0 For ?k = 1 ?To ?100 s = s + k Next ?k Text1.Text = s End Sub ? （3）运行程序 运行程序后，单击命令按钮“计算”，文本框Text1中显示出计算的结果5050，如图6-3所示。 6-3 计算结果 例6-2：设计程序，计算级数13 + 23 + 33 + 43 +...，直到累加和超过200为止。 分析：本题也是一个求累加和的计算，但关键问题是不知道循环的次数到底是多少，无法设定循环变量的终值。我们可以事先将循环变量的终值设定为一个比较大的数，在循环体中用一个分支语句来检测累加的