For-next循环
第十五课 For….Next 计数循环语句 和 Do…Loop条件循环语句r
********************************************************************中华隐士黑客联盟主站：/规模最大、实力最强、信誉最好的网络技术培训站点专业的技术站点权威的技术培训最好的免费学习电脑技术天地真正的技术，就是要用实力来说话欢迎来到中华隐士黑客联盟。
注：本教程只做技术交流，请不要用作非法用途！中华隐士黑客联盟***********************************************************主题：VB系列培训–第十五课内容：For….Next 计数循环语句和Do…Loop条件循环语句在有的时候，我们需要编写一个语句，并且希望这些语句能够根据一定的状况，可以循环的执行，那么就可能用到今天这节课我们讲到的For…next，它的主要功能是：针对某个变量的取值范围，循环执行某些语句。
Inputbox 输入语句它的语法如下：（1）、For 变量（名称）= 初始值To 终止值要执行的语句Next举个例子：Dim n ‘定义一个变量nMsgbox “10”Msgbox “11”Msgbox “12”Msgbox “13”Msgbox “14”……如果这么写，也可以连续弹出些消息框，逐个显示10-20，但是比较繁琐，有没有好些的方法？答案是肯定的！看代码：Dim nFor n = 10 to 20Msgbox nNext ‘这么写的效果和原先的一样，含义也是：弹出一些消息框，消息框的内容是：10-20 . 那么有些人可能问，这种格局，到底是怎么运行的呢？下面我具体的用一个图来表示：首先我们知道：For 变量= 初始值to 终止值｛这里就是循环执行的内容｝当然，可以是多个。
Next 【最后用这个Next结束】那么计算机遇到这种格局的语句，是这样执行的。
第一步：为这个变量赋予初始值。
第二步：判断这个变量的当前值的范围是否在“初始值”和“终止值”之间。
For-next循环
For-next循环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后⾯的其他指令继续执⾏。
循环结构及应用
课题：循环结构及应用——For Next循环班级组别姓名教师评价:编制人：朱泽斌审核人：杨宇虹【学习目标】1、认识For…Next循环语句的基本结构2、学会应用For…Next循环语句解决学习生活中的一些简单问题重点：For…Next循环语句的基本结构难点：学会应用For…Next循环语句【预习案】【使用说明与学法指导】1.用20分钟左右的时间，阅读探究课本的内容，熟记基础知识。
自主高效预习，提升自己的阅读理解能力.2.完成教材助读设置的问题，然后结合课本的基础知识和例题，完成预习自测题.3.将预习中不能解决的问题标出来，并写到后面“我的疑惑”处.一、相关知识：1．循环结构三种不同的语句：________________、__________________、________________。
b5E2RGbCAP2．For Next循环也叫For循环或计数循环，一般应用于循环次数已知的循环。
二、教材助读：1、For Next循环格式：2、循环变量：三、预习自测：1．以下程序的输出结果是( >A、10，1 9，2B、9，8 7，6C、10，9 9，0 D、10，10 9，1main( >{int x=10，y=10，i；for(i=0；x>8；y=++i>printf(＂%d，%d＂，x- -，y>；}注解：循环执行2次，由x控制循环的执行次数；输出值为两次循环过程中x 每次的自减值和y在for语句的第三个表达式中得到的i自增变化后的值。
p1EanqFDPw2、以下程序的输出结果是( >A、#*#*#B、#####C、*****D、*#*#* main( >{ int i；for(i=1；i<6；i++>{ if(i%2>{printf("#">；continue；}printf("*">；}printf("\n">；}注解：循环控制变量i的值从1变化到5，i为1、3、5时，i%2为1，if语句的条件为真，则执行if后的子句，输出#，然后执行continue语句，终止本次循环的执行，进入下一轮循环，i为2、4时，i%2为0，if语句的条件为假，则if后的子句并不执行，直接输出*，所以最后的输出为#*#*#。
教案(VB_FOR)
FOR---NEXT循环语句教案主讲: 常庆红教案【导入新课】编写一个程序：打印5行竖排的“*”。
如果是打印10行，100行甚至更多，那应该怎样实现？在窗体上输出1到10这十个数字。
如果是输出到100甚至更多，那应该怎样实现？在以上两个例子中,可以看到如果完成这个任务,有很多重复的语句,如何来减化这个程序并达到相同的效果呢?这就要用到一个新的知识,循环结构。
今天，这节课上我们讲解循环结构其中的For-Next循环结构语句。
【新课讲解】循环结构与循环结构语句1、For-Next循环结构语句（1）一般形式：For 循环变量=初值to 终值Step 步长值循环语句组Next 循环变量［格式说明］①For与Next必须成对出现，Next必须位于For语句之后。
②循环变量必须是数值型，且最好为整型变量。
③当步长值=1时，［Step 步长值］部分可以省略④Next后面的循环变量可以省略，For、Next后面的循环变量是同一个。
⑤For循环分递增循环和递减循环两种。
递增循环：当初值小于等于终值，步长值>0。
递减循环：当初值大于终值，步长值<0。
［格式举例］ 例For I= 1 To 5Print “*” Next I（2今天先讲For 循环的递增过程，流程图如下：具体执行过程描述如下： ①将初值赋值给循环变量②判断循环变量的值是否小于等于终值若为真（True ），则执行循环语句，而后转到③执行若为假（False ），则转到④执行I 为变量1是初值，5是终值语句组③将变量的值加上步长值，而后返回②执行 ④循环结束，顺序执行Next 后面的语句 ［程序举例］For/next 循环语句1、请同学们阅读下面程序，写出结果并上机验证，画出流程图，说明程序功能。
for i=1 to 3 step 1print i next i end执行执行停止执行<3=3>3234123123执行下一次循环否？i 与终值比较执行NEXT 之后i 的值循环开始时i的值第几次循环I =1Prnit iI=I+1I >= 3N Y[程序执行过程分析]For/next 循环语句1）如果把程序中的step 1改成step -1,应该如何修改程序。
for...next循环结构课件
课外作业
1、用for循环语句求：21+22+23+…+264的和 2、预习教材上do…loop循环
S=0 For i=1 to 8 step 3 S=s+3 Next i Print s • 提问： 此循环语句中，循环变量是? 初值是? 终值是? 步长是? 循环体中的语句是?
For-Next循环语句的执行过程 For-Next循环语句的执行过程
For-Next循环语句的执行步骤 For-Next循环语句的执行步骤
FOR…NEXT循环程序结构 FOR NEXT循环程序结构 NEXT
复习
• 顺序结构 从上往下、顺序执行 • 分支结构 If <条件> Then <语句块1> Else <语句块2> End If
For-Next循环语句的格式： For-Next循环语句的格式： 循环语句的格式
• For <循环变量>=<初值> To <终值> step <步长>
• • • •
语句块 [Exit for] 语句块 Next <循环变量>
例1
• 在窗体上输出1到10这十个数字。 • 程序代码： for i=1 to 10 step 1 print i next i • 分析此循环语句中
循环变量 初值 终值 步长 循环体中的语句
实例1程序的执行过程：
例2
分析程序 分析执行过程：
应用提高： 应用提高：
• 用for循环语句编程求1+1/2+1/3+1/4+1/5的和
课外探究
• 1、循环变量的步长能否为0，如果为0， 将会出现什么情况？ • 2、循环变量是不是一定要出现在循环体 中，参与运算？ • 3、对于循环变量的值超过终值，你是如 何理解的？（结合步长为正，为负两种情 况） • 4、循环体被执行的次数由什么决定？
循环的嵌套教学设计与反思
循环的嵌套教学设计与反思【教学目标】1、能准确掌握“FOR － NEXT”循环结构的应用。
2、熟练掌握循环的嵌套，并能编写双重循环结构的程序。
【教学重点】循环嵌套语句的结构和使用。
【教学难点】for循环的嵌套执行过程。
一、知识点：与选择结构语句一样，循环结构语句也可以进行嵌套。
1、if语句的嵌套If 条件ThenIf 条件Then语句块1Else语句块2End ifElseIf 条件Then语句块3Else语句块4End ifEnd if例：将学生考试成绩的百分制转化为等级制。
成绩>=90分为A级，80分<=成绩<90分为B级，70分<=成绩<=80分为C级，60分<=成绩<70分为D级，成绩<60为F级。
Private Sub Form_Click( )Dim score as singleScore=V al（inputbox（“输入一个学生的成绩：”））If score>=90 ThenPrint “A”ElseIf score>=80 ThenPrint “B”ElseIf score>=70 ThenPrint “C”ElseIf score>=60 ThenPrint “D”ElsePrint “F”End ifEnd ifEnd ifEnd ifEnd sub2、For … Next 语句循环结构也称重复结构，它的作用是使一段程序能重复执行，被重复执行的部分称为循环体。
但重复一般都是有条件的，即在满足FOR语句中的条件下才执行循环体，否则退出循环体。
语句的格式：For 循环控制变量=初值to 终值[step 步长]循环体语句块Next [循环控制变量]说明：1、循环控制变量必须为整型；2、缺省步长为1 。
二、编写具有循环嵌套结构的程序[例1]：设计一个程序，打印如图1所示的图案。
*****师生共同分析，得出结论：重复输出星号，要用循环结构，循环变量的初值为1，终值为5。
excel循环语句
excel循环语句Excel中常用的循环语句有以下四种：1. For...Next循环：按顺序循环执行指定次数的操作，常用于遍历数组或列表。
语法：```。
For 变量 = 开始值 To 结束值 [Step 步长]。
'执行的代码。
Next [变量]。
```。
示例：```。
Sub ForNextDemo()。
For i = 1 To 10。
Cells(i, 1).Value = i。
Next i。
End Sub。
```。
2. Do...Loop循环：根据指定的条件循环执行一组语句，常用于执行不确定次数的循环，有多种写法。
语法1：```。
Do While 条件。
'执行的代码。
Loop。
```。
语法2：```。
Do Until 条件。
'执行的代码。
Loop。
```。
语法3：```。
Do。
'执行的代码。
Loop While 条件。
```。
语法4：```。
Do。
'执行的代码。
Loop Until 条件。
```。
示例：```。
Sub DoLoopDemo()。
Dim i As Integer。
i=1。
Do Until i > 10。
Cells(i, 2).Value = i。
i=i+1。
Loop。
End Sub。
```。
3. While...Wend循环：根据指定的条件循环执行一组语句，常用于执行不确定次数的循环。
语法：```。
While 条件。
'执行的代码。
Wend。
```。
示例：```。
Sub WhileWendDemo()。
Dim i As Integer。
i=1。
While i <= 10。
Cells(i, 3).Value = i。
i=i+1。
Wend。
End Sub。
```。
4. For Each...Next循环：按顺序循环执行对象集合中的每个对象的操作，常用于遍历集合，如单元格、区域等。
语法：```。
For Each 对象 In 集合。
For循环结构教学设计
……
Print????Sqr（100）
End??Sub
循环结构编程：
Private??Sub??Command_Click(?)
For?I=2??To?100??Step??2
????Print??Sqr?(I)
Next??I
End??Sub
FOR循环语句的注意事项：
1、For-?Next语句成对出现，循环变量名保持一致
For…Next循环结构教学设计
基本信息
课题
VB程序设计第六章第一节
作者及工作单位
杜美娜大城职教中心
教材分析
1、本教案适用于新课程标准下职高二年级学生， 1课时。
2、在学习本课之前，学生应掌握VB程序的编程环境与运行方法，了解顺序结构和选择结构的程序执行流程，具备一定的算法基础和具有一定的比较、归纳能力。
2、循环变量是数值型变量
3、步长值可正可负，当步长值为1时，Step及步长值可以省略
4、初值、终值和步长值既可以是常量，也可以是变量和表达式
三、总结：
1、FOR语句的格式包括三个部分：FOR语句、NEXT语句和循环体，注意事项要记清楚；
2、分析循环程序时要注意重复处理的操作(循环体)和循环次数(循环结束的条件)。
Next?a
Print?"s=";?s
Print?"a=";?a
加强练习，锻炼学生的合作能力
进一步理解循环语句的执行过程
提高学生运用知识解决实际问题的能力
教学环节
教师活动
预设学生行为
设计意图
【学生练习】
【本课小结】
【课后探究】
教师评讲：
For循环语句
• 案例分析 S=0 For i=1 To 3 Step 1 S=i+2 Print S Next i
第4次循环，循环开始时i=4， 第1次循环，循环开始时 第3次循环，循环开始时 第2次循环，循环开始时 执行结果为： 3 i与终值比较：4>3，不执行 i=1，i与终值比较：1<3， i=3，i与终值比较：3=3， i=2，i与终值比较：2<3， 4 循环体，循环结束 执行s=1+2，输出s，执行 执行s=3+2，输出 执行s=2+2，输出 s，执行 5 Next后i=2 Next后i=4 Next后i=3
二、For/Next循环语句的执行过程
循环变量 初值 • ①循环变量取初值； • ②循环变量与终值比较， 循环变量 N 没有超过终值转③，否 <=终值 Y 则循环结束，接着执行 循环体 循环语句的后继语句； • ③执行一次循环体； 循环变量 循环变量+步长 • ④循环变量增加一个步长； • ⑤重复步骤②～④。 执行Next后的语句
s=0 i=1 i<=3 Y s=i+2 输出S i=i+1 N
练习 1、阅读程序，说出程序的功能 Private Sub form_click() For i= 25 To 5 Step –5 Print i 功能：输出25到5之间 Next i 的5的倍数，即输出25、 20、15、10、5 End Sub
一、For-Next循环语句的格式
数 值 型
For 循环变量=初值 To 终值 Step 步长
循环体 Next
需要重复执行的一条或多条语 句 可正可负，但是不能 循环变量 为0，省略默认为1
循环变量+步长
练习：找出下面程序的初值、终值、步长、循环体 负数 1、 For i=20 To 10 Step –2 Print i 初值大于终值 Next i 正数 2、 For j = 1 To 5 Step 1 Print “*” 初值小于终值 Next j
《For…Next循环结构》课件
Dim a
For a=10 to -10 step -6 For a=10 to -10 step -6
Print a;
If a<0 Then
If a<0 Then
Exit For
Exit For
End If
End If
Print a;
Next a End Sub
Next a End Sub
运行结果：10 4 -2 运行结果：10 4
练习一
利用For…Next循环结构编写程序代码计算式 表达式的值：
sum=2+4+6+…+96+98+100 ? Private Sub Command7_Click()
?
End Sub
练习一
sum=2+4+6+…+96+98+100 ?
Private Sub Command7_Click()
18 19 20
Private Sub Command10_Click()
Dim a,sum
For a=2 to 20
sum=sum+1/a
Next a
Print Format(sum,”0.0000”)
End Sub
思考 sum= 1 - 1 +… + 1 - 1 + 1 ?
第四次执行循环语句：
19<=20 → 输出a=19 → 19＋1 → 20<=20 继续循环
第五次执行循环语句：
20<=20 → 输出a=20 → 20＋1 → 21>20 退出循环
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
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 各控件属性设置值控件名属性属性值Label1Caption“1+2+3+…+100 =”Text1Text“”（空白）Command1Caption“计算”图6-2 程序界面（2）编写程序代码。
双击界面上的命令按钮，打开代码设计窗口给命令控件Command1编写如下代码：Private Sub Command1_Click()s = 0For k = 1 To 100s = s + kNext kText1.Text = sEnd Sub（3）运行程序运行程序后，单击命令按钮“计算”，文本框Text1中显示出计算的结果5050，如图6-3所示。
6-3 计算结果例6-2：设计程序，计算级数13 + 23 + 33 + 43 +...，直到累加和超过200为止。
分析：本题也是一个求累加和的计算，但关键问题是不知道循环的次数到底是多少，无法设定循环变量的终值。
我们可以事先将循环变量的终值设定为一个比较大的数，在循环体中用一个分支语句来检测累加的结果，只要累加和大于200时，就可以跳出循环，显示计算结果。
（1）建立应用程序用户界面并设置各控件对象初始属性，如图6-4所示。
图6-4 程序用户界面（2）对命令按钮Command1编写Click事件代码：Private Sub Command1_Click()s = 0For k = 1 To 100s = s + k ^ 3If s > 200 ThenLabel2.Caption = "最后的项数是：" & kExit ForEnd ifNext kText1.Text = sEnd Sub（3）运行程序，结果如图6-5所示。
图6-5 程序运行结果例6-3：设计程序，求100——999之间所有的“水仙花”数。
所谓“水仙花”数就是指一个三位数，其各位数字的立方等于该数本身。
例如，153 = 13 + 53 + 33，故153就是“水仙花”数。
分析：求解该题的的关键是如何从一个三位数中分离出百位数、十位数和个位数来。
可以用以下方法进行分离：设该三位数为I，由a、b、c三个数字组成，则：（1）百位数a = INT(I/100)，例如 INT(353/100) = 3（2）十位数b = INT((I-100*a)/10)，例如 INT((353-100*3)/10) = 5（3）个位数c = I-INT(I/10)*10，例如 353-INT(353/10)*10 = 353-35*10=3（1）设计用户界面，如图6-6所示。
图6-6 程序界面（2）编写命令按钮Command1的Click事件代码如下：Private Sub Command1_Click()For i = 100 To 999 Step 1a = Int(i / 100)b = Int((i - 100 * a) / 10)c = i - Int(i / 10) * 10If i = a ^ 3 + b ^ 3 + c ^ 3 ThenPrintPrint " ";Print iEnd IfNext iEnd Sub（3）运行程序，结果如图6-7所示。
4. For...Next语句的嵌套单层循环可以解决一些简单的问题，但实际应用中有许多问题需要两层甚至更多层循环才能完成计算或处理。
在一个循环结构中还包含另一个循环结构称为循环的嵌套。
用For...Next语句构造循环嵌套结构，就是在For...Next语句中的循环体部分再安排另一层For ...Next语句。
嵌套的层数没有限制，但应满足以下规则：（1）每层循环必须有一个唯一的变量名作为循环变量名；（2）内层存循环必须完全放在外层循环的里面（外循环体内），内、外层循环不得相互交叉，如图6-8所示。
正确的循环嵌套错误的循环嵌套（内外层相互交叉）图6-8循环嵌套结构例6-4：设计一个程序，打印乘法九九表。
即打印1×1 = 1, 1×2=2,……9×9=81。
分析：先考虑怎样实现打印1×1 = 1, 1×2 = 2,……1×9 = 9。
这只要一个简单的For循环结构就可以实现：n=1for j=1 to 9s = n * jPrint s；Next j因为n被事先赋值为1，所以当循环变量j从1变到9时，打印的结果就是1×1 = 1, 1×2 = 2,……1×9 = 9。
要打印2×1 = 2, 2×2 = 4,……2×9=18，就要将程序一开头的 n赋值为2。
当需要打印整个九九表时，n的赋值就应从1开始，直到9为止依次改变。
对应每个不同的n 的数值，执行一次j从1到9改变的For 循环。
即n每次改变一个数值，j就从1变化到9，打印出n和j的乘积。
这就提示我们要用到双层结构的For 循环程序结构来解决这个问题：For n = 1 to 9For j = 1 to 9S = n * jPrint s；Next jNext n这个双层循环的执行过程是这样的：（1）把初值1赋给外层循环变量n (这个值一直保持到遇到外层循环的Next n后才改变)。
然后开始执行外循环的循环体，即外循环For 和Next之间的其他语句。
这时因为外循环的循环体正好又是一个For... Next语句构成的循环结构，称为内循环，于是在n=1时，j就要从1变化到9，反复执行9次，打印出1×1 = 1到1×9 = 9。
（2）当内层循环被执行完毕后（j>9），程序才能够执行（遇到）Next n语句，于是n增值为2。
现在n< 9，外循环的循环体还要被执行，这样就再次进入到内循环。
因为n=2，于是这次内循环计算和打印的就是2×1 = 2到2×9=18。
（3）内存循环执行完毕后，再次遇到Next n语句，n增值为3，因为这时n依然小于9，所以还要继续重复上述过程。
n的值由1依次变到9，最后一次打印出9×1 = 9到9×9 = 81。
当n再次增值时，就超过终值9（n > 9）了，于是外层循环结束，整个程序执行完毕。
这里应注意到，每次n改变时，内存循环变量j都被重新赋初值1。
设计过程。
（1）新建一个工程，在窗体上添加一个命令按钮控件Command1,并将其Caption属性设置为“开始计算”，如图6-9所示。
图6-9 程序界面设计（2）对命令按钮Command1编写Click 事件代码如下：Private Sub Command1_Click()PrintPrint " *";For i = 1 To 9Print Tab(i * 6); i;Next iPrintFor n = 1 To 9Print n; " ";For j = 1 To 9s = n * jPrint Tab(j * 6); s;Next jPrintNext nEnd Sub（3）运行程序，结果如图6-10所示。