VisualBasic程序设计VB6教程幻灯片.PPTVIP

（3）在格式（1）中，While和Until放在循环的末尾，分别叫体Do…Loop While和Do…Loop Until循环，它们的逻辑流程分别。 例如： Private Sub Command1_Click() I=0 Print “****Loop start****” Do Print “Value of I is “; I I=I+1 Loop While I10 Print“****Loop End****” Print “Value of I at end of loop is”;I End 开始 结束 变量初始化 循环体的下一条语句 条件为真吗？ 执行循环体 计算“条件”值 Yes No (a)While 开始 结束 变量初始化 循环体的下一条语句 条件为真吗？ 执行循环体 计算“条件”值 No Yes (b)Until Do……Loop While|Until循环逻辑框图 （4）在格式2中，While和Until放在循环的开头，即紧跟在关键字Do之后，组成两种循环，分别叫做Do While…Loop循环和Do Until…Loop循环，它们的执行过程分别： 开始 结束 变量初始化 循环体的下一条语句 条件为真吗？ 执行循环体 计算“条件”的值 No Yes (a)While Do While|Until ……Loop 循环逻辑框图 开始 结束 变量初始化 循环体的下一条语句 条件为真吗？ 执行循环体 计算“条件”的值 Yes No (b)Until 教师：李慧芳 Do循环的格式如下： （1）Do [语句块] [Exit Do] Loop[While|Until 循环条件] （2）Do[While|Until 循环条件] [语句块] [Exit Do] Loop （5） Do While|Until…Loop循环先判断条件，然后在条件满足时才执行循环，否则不执行。（而Do……Loop While|Until循环则是先执行，再判断。） 结果： Do While|Until……loop 可能一次也不执行循环体，而Do……Loop While|Until循环至少要执行一次循环体。 （6）和While循环一样，如果条件总是成立，Do循环也可能陷入“死循环”。在这种情况下，可以用Exit Do语句跳出循环。一个Do循环可以有一个或多个Exit Do语句，并且Exit Do语句可以出现在循环体的任何地方。当执行到该语句时，结束循环，并把控制转移到Do循环后面的语句。用Exit Do语句只能从它所在的那个循环中退出。 （7）Do循环可以嵌套，其规则与For-Next循环相同。 例： 目前世界人口约为60亿，如果以每年1.4%的速度增长，多少年后世界人口达到或超过70亿。 分析： 人口是在不断循环增长的，可以用一个公式表示: Renshu=renshu*(1+1.4%):I=I+1 人数达到多少就可以退出这个循环呢？人口达到或超过70亿，所可以用Until条件来实现，也就是说我们用Do……Loop Until条件语句来实现。 其中，年数的增加可以用I=I+1来表达。 条件：renshu=7000000000 并且：I=0: renshu=6000000000 多重循环 通常把循环体内不含有循环语句的循环叫做单层循环，而把循环体内含有循环语句的循环称为多重循环。 例如： 在循环体内含有一个循环语句的循环称为二重循环。 多重循环又称多层循环或嵌套循环。 For I=1 to 100 For j=1 to 100 Print I+j if I*j5000 then Exit For Next j Next i 二重循环 Private Sub Command1_Click( ) For I=1 to 4 x=4 For j=1 to 3