14-程序流程控制——Do While语句介绍

excel交流

Do While也是循环语句，它分为两种情况，一种是把循环条件放在开头，一种是把循环条件放在结尾。

1、开头判断循环条件
    语句格式：
       Do Wihle 循环条件
            语句块1
           [Exit Do]
            语句块2
      Loop
    首先判断循环条件，条件为真则执行Do到Loop之间的语句。

2、结尾判断循环条件
    语句格式：
        Do
            语句块1
           [Exit Do]
            语句块2
       Loop Wihle 循环条件

      先执行一次Do到Loop之间的语句，再判断循环条件，满足条件则进行循环。
两种格式的区别：因为第二种格式是把循环体放在尾部，得先执行一遍语句再进行循环条件判断，所以，同样的条件，第二种格式的循环会比第一种多执行一次循环部份的语句。
我们用Do While语句来解决求1——1000的自然数的和的问题：

1. 
   
2. Sub mysum()
   
3. Dim Lsum As Long, i As Long
   
4. i = 1
   
5. Do While i <= 1000
   
6.    Lsum = Lsum + i
   
7.    i = i + 1
   
8. Loop
   
9. MsgBox "1到1000的自然数和为：" & Lsum
   
10. End Sub
    

复制代码