VB第4章分支与循环结构.ppt

⑵ D0 循环体 [Exit Do] Loop While 条件 例4:修改例3 Dim I As Integer ,s As Integer I=1 Do While I=10 s=s+I I=I+1 Loop Print I,s Dim I As Integer ,s As Integer I=1 Do s=s+I I=I+1 Loop While I=10 Print I,s (1)循环体执行几次？ (2)将I先赋值为11， 执行结果如何? 1. While循环 Do…Loop循环 ⑴ Do While 条件 循环体 [Exit Do] Loop ⑵ D0 循环体 [Exit Do] Loop While 条件 区别:(1)执行顺序不同 形式一:先判断,后执行循环体; 形式二:先执行循环体,后判断 (2)执行次数不同（特殊情况下） 形式一:条件不满足,循环体可能一次也不执行 形式二:不论条件如何,至少执行一次 1.While循环（当型循环） Do…Loop循环 执行过程:（先判断，后执行） 先判断循环条件： 条件为假: 执行循环体, 然后再判断条件. 条件为真: 跳过循环体, 执行Loop之后语句 ⑶ Do Until 条件 循环体 [Exit Do] Loop 2.Until循环（直到型循环） 循环条件 语句块 F T 语句块 F Exit Do T Do…Loop循环 ⑶ Do Until 条件 循环体 [Exit Do] Loop 例5:修改上例 Dim I as integer,s As Integer I=1 Do While I=10 s=s+I I=I+1 Loop Print I,s Dim I as interger,s As Integer I=1 Do Until s=s+I I=I+1 Loop Print I,s ⑴条件应该如何写出? ⑵ 显示的I、S值与 上例一样吗？ ⑷ Do 循环体 Loop Until 条件 I10 Do…Loop循环 2.Until循环 几种形式比较: Do While 条件 循环体 Loop（ While 条件） Do Until 条件 循环体 Loop（ Until 条件） 区别: While 条件为真时执行循环体,否则退出循环 Until 条件为假时执行循环体,否则退出循环 关系： While和Until可以相互转换，但循环条件取反 Do…Loop循环 1.GoTo语句 2.Exit语句 满足循环条件的情况下，提前跳出循环体，结束循环。 两种形式：Exit For、Exit Do 作用：无条件的转移到标号或行号指定的语句 语法：GoTo {标号|行号} 100 If I = 100 Then s = s + I I = I + 2 GoTo 100 End If 其他辅助控制语句 Dim I As Integer If I mod 17 =0 then print I end If For I=100 to 200 Next I Exit for 分析： 重复工作：判断每个数除17的余数是否为0 初值、终值和增量： 练习： 求出100～200之间的第一个能被17整除的整数。 其他辅助控制语句 循环的嵌套：在一个循环体内又包含了一个完整的循环结构 4.4 循环嵌套 For I = 1 To 9 For J = 1 To I s = I × J = I * J Picture1.Print Tab((J - 1) * 8 + 1); s; Next J Picture1.Print Next I 注意： 内、外循环变量不能同名 外循环必须完全包含内循环，不能出现交叉 在循环体中遇到Ex