《第4章3循环结构2.ppt》由会员分享，可在线阅读，更多相关《第4章3循环结构2.ppt（63页珍藏版）》请在第壹文秘上搜索。
1、 在Visual Basic程序的三种结构中,循环结构是一种重要结构。循环的本质循环的本质：不断地重复某种动作。对计算机程序而言，循环必须具备两个重要因素：对计算机程序而言，循环必须具备两个重要因素：1.在一定的条件下，重复执行一组语句2.必然出现不满足条件的情况，使循环终止一、循环程序设计结构 VB中提供了两种类型的循环语句：中提供了两种类型的循环语句：一种是计数循环语句；一种是计数循环语句；另一种是条件循环语句。另一种是条件循环语句。Visual Basic 支持的循环结构有：支持的循环结构有：DoLoop For.Next WhileWend GoTo 语句语句重点掌握：重点掌握：DoL
2、oop、For.Next、WhileWend等前三等前三种循环种循环、For循环语句语法格式：语法格式：For 循环变量循环变量=初值初值 To 终值终值 Step 步长步长 Next 循环变量循环变量循环体循环体循环变量增加步长循环变量增加步长循环变量获得初值循环变量获得初值F循环变量在终值内循环变量在终值内?For循环的执行过程T例例题：题：编程计算：编程计算：S=1*2*3*10Dim S&,i%S=1 累加前变量累加前变量S为为1For K=1 to 100 S=S*KNext KPrint S=,S For循环语句 步长可为正、可为负、为步长可为正、可为负、为1时可省略时可省略 如果
3、步长为正，则变量小于等于终值时循环如果步长为正，则变量小于等于终值时循环 如果如果步长为负步长为负，则变量大于等于终值时循环，则变量大于等于终值时循环 当是单层循环时，当是单层循环时，Next后面的循环变量可不后面的循环变量可不写写 特点：计数型循环，特点：计数型循环，循环次数循环次数=INT(终值终值-初值初值)/步长步长+1 For语句和语句和Next语句必须成对出现语句必须成对出现 在循环体中可以使用循环变量，但一般不再在循环体中可以使用循环变量，但一般不再对循环变量赋值。对循环变量赋值。DoDoLoopLoop循环用于循环用于事先不知道循环次数事先不知道循环次数的循的循环结构。此种语句
4、四种语法格式：环结构。此种语句四种语法格式：.Do While.Do While Loop Loop 语句语句 .Do.Do Loop While Loop While 语句语句 .Do Until.Do Until Loop Loop 语句语句 .Do.Do Loop Until Loop Until 语句语句 .Do While Loop语句语句语法格式：语法格式：Do While 条件表达式条件表达式 循环体循环体 LoopTF条件条件循环体循环体流程图说明：条件表达式可以是一个逻辑表达式，也可以是一个关系表达式，其值应是逻辑型。Do While和Loop应成对出现。循环体中要有改变循环
5、控制变量值的语句，以避免出现死循环。由于该循环的特点是先判断条件，然后再决定是否要执行循环体里的语句。所以，这种循环可以一次也不执行循环体。Exit Do 表示当遇到该语句时，强制退出循环，执行Loop后的下一条语句，一般与If 语句联用（2）.Do Loop While语句语句语法格式：语法格式：Do 循环体循环体 Loop While条件表达式条件表达式流程图TF条件循环体注意：注意：至少要执行循环体一次。与Do While循环的区别：Do While循环先测试条件是否循环先测试条件是否成立，只有成立才执行循环；而成立，只有成立才执行循环；而该循环先执行循环体，后测试条该循环先执行循环体，
6、后测试条件是否成立。件是否成立。语法格式：语法格式：Do Until条件表达式条件表达式 循环体循环体 Loop .Do Until Loop语句语句Do Until Loop语句流程图.Do Loop Until语句语句格式：格式：Do 循环体循环体 Loop Until条件表达式条件表达式TF条件循环体Do Loop Until语句流程图FT条件循环体A=val(InputBox(“请输入第请输入第1个学生成绩个学生成绩”)B=val(InputBox(“请输入第请输入第2个学生成绩个学生成绩”)C=val(InputBox(“请输入第请输入第3个学生成绩个学生成绩”)Avg=(A+B+C
7、)/3Print Avg编程：通过输入对话框输入三个学生成绩，计算成绩编程：通过输入对话框输入三个学生成绩，计算成绩平均分。平均分。此程序存在问题：如果需要输入此程序存在问题：如果需要输入20个成绩或更个成绩或更多或成绩个数根本不确定，则几乎让人无法忍受多或成绩个数根本不确定，则几乎让人无法忍受编程：通过输入对话框输入编程：通过输入对话框输入10个学生成绩，计算成绩平均分。个学生成绩，计算成绩平均分。K=1Do While K=10 A=val(InputBox(“请输入第请输入第1个学生成绩个学生成绩”)K=K+1LoopAvg=(A+B+C)/10Print Avg思路思路：在前一程序的基
8、础上作些改动，：在前一程序的基础上作些改动，10个数据的输入个数据的输入过程用循环实现：让第一个输入语句循环过程用循环实现：让第一个输入语句循环10次次思考：此程序存在哪些问题？思考：此程序存在哪些问题？1、输入的前面、输入的前面9个成绩丢失个成绩丢失,B 和和 C中无值中无值2、输入对话框中的提示总是显示、输入对话框中的提示总是显示“第第1个个”解决办法：解决办法：1、每个输入的成绩即时累加；、每个输入的成绩即时累加；2、提示信息分解、提示信息分解成三部分：成三部分：“请输入第请输入第”、变量变量K 、“个学生成绩个学生成绩”K=1：s=0Do While K=10 A=val(InputB
9、ox(“请输入第请输入第”&K&“个学生成绩个学生成绩”)S=S+Val(A):K=K+1LoopAvg=S/10Print Avg编程：通过输入对话框编程：通过输入对话框输入若干输入若干成绩，成绩，如果输入的成如果输入的成绩为绩为-1，表示输入数据完毕，表示输入数据完毕，计算成绩平均分。，计算成绩平均分。S=0 :N=1 cj=Val(InputBox(请输入第请输入第&N&个成绩个成绩)Do While cj -1 S=S+cj N=N+1 cj=Val(InputBox(请输入第请输入第&n&个成绩个成绩)Loop Avg=S/(N-1)Print 平均成绩为：平均成绩为：;AvgExi
10、t Do与Exit For语句 语句功能：强制退出循环语句功能：强制退出循环 Exit Do语句只能用在语句只能用在Do循环语句中循环语句中 Exit For 语句只能用在语句只能用在For循环语句中循环语句中 使用方法：在循环体中，作为使用方法：在循环体中，作为IF语句的子句语句的子句x=1For K=1 To 30 If x=10 Then Exit For If x Mod 2=1 Then x=x+7 Else x=x-5Next KPrint x功能：功能：当当WhileWhile的条件表达式的值是的条件表达式的值是TrueTrue时执行循环体内的时执行循环体内的代码，直到代码，直到
11、WhileWhile后的条件表达式的值为后的条件表达式的值为FalseFalse。说明：说明：它与它与Do Do LoopLoop语句的差别是：语句的差别是：While While WendWend语句中不能使用语句中不能使用ExitExit语句跳出循环。语句跳出循环。语法格式：语法格式：While (While (条件表达式条件表达式 ）等价于等价于 do Whiledo While（条件表达式）（条件表达式）循环体循环体 循环体循环体Wend LOOPWend LOOP3、WhileWend循环结构循环结构4、GoTo语句构成循环语句构成循环格式：格式：GoTo 标号标号|行号行号说明：说
12、明：标号：冒号结尾的标识符标号：冒号结尾的标识符 行号：一个整数，不跟冒号行号：一个整数，不跟冒号功能：无条件转移到指定行号或标号处执行功能：无条件转移到指定行号或标号处执行P=10000:r=0.025T=1Again:If t10 then goto 100I=P*rP=P+IT=t+1Goto Again100Print p二、循环的嵌套二、循环的嵌套多重循环结构多重循环结构1 1、如果在一个循环内完整地包含另一个循环、如果在一个循环内完整地包含另一个循环结构，则称为多重循环，或循环嵌套，结构，则称为多重循环，或循环嵌套，2 2、嵌套的层数可以根据需要而定，嵌套一层、嵌套的层数可以根据需
13、要而定，嵌套一层称为二重循环，嵌套二层称为三重循环。称为二重循环，嵌套二层称为三重循环。上面介绍的几种循环控制结构可以相互嵌套，上面介绍的几种循环控制结构可以相互嵌套，下面是几种常见的二重嵌套形式：下面是几种常见的二重嵌套形式：（1）For I=.For J=.Next J .Next I（2）For I=.Do While/Until.Loop .Next I（3）Do While.For J=.Next J .Loop（4）Do While/Until.Do While/Until.Loop .Loop对于循环的嵌套，要注意以下事项：对于循环的嵌套，要注意以下事项：(1)内循环变量与外循环
14、变量不能同名；内循环变量与外循环变量不能同名；(2)外循环必须完全包含内循环，不能交叉；外循环必须完全包含内循环，不能交叉；(3)不能从循环体外转向循环体内，也不能从外循环转向内循环不能从循环体外转向循环体内，也不能从外循环转向内循环.正 确错 误 For i=1 To 10 For j=1 To 20 Next i Next j For i=1 To 10 For j=1 To 20 Next j Next i For i=1 To 10 Next i For i=1 To 10 Next i For i=1 To 10 For i=1 To 20 Next i Next i一、程序分析举例
15、一、程序分析举例题目题目1:K=7A=5Do K=K-1 A=A+2Loop Until K 1 n=n+1 j=j+n*(n+1)LoopPrint n;j写出程序的输出结果写出程序的输出结果:3 1程序分析举例程序分析举例题目题目3:k=1:m=2:n=4Do While k 0 If DC Then C=C+1 D=Val(InputBox(请输入一个数请输入一个数)LoopPrint C+D运行时输入运行时输入9,8,7,0写出程序的输出结果写出程序的输出结果:7程序分析举例程序分析举例题目题目5:S=0:i=1Do while i100 if i mod 100 then s=s+i
16、 end if i=i+1LoopPrint s=;s写出程序的输出结果写出程序的输出结果:S=4500程序分析举例程序分析举例题目题目6:x=1y=1For i=1 To 3 f=x+y y=x x=f Print f;Next i写出程序的输出结果写出程序的输出结果:2 3 5程序分析举例程序分析举例题目题目7:x=1For y=1 To 30 If x=10 Then Exit For End If If x Mod 2=1 Then x=x+7 Else x=x-5 End IfNext yPrint x写出程序的输出结果写出程序的输出结果:10程序分析举例程序分析举例题目题目8:For i=1 To 10 k=2*i-1 Print k;If I Mod 3=0 Then PrintNext i写出程序的输出结果写出程序的输出结果:1 3 5 7 9 11 13 15 17 19循环结构程序的要素：循环结构程序的要素：二、程序设计举例二、程序设计举例依据四要素画出流程图依据四要素画出流程图,再写程序再写程序1.处理的数据量大或处理的步骤多处理的数据量大或处理的步骤多2.对每个
