VBA简单入门14：Do循环

Do...Loop循环适用于当逻辑条件满足时的情形。

1、Do Until...Loop循环

Do Until x > 26 '一直重复循环里面的操作，直到x>26退出循环  i = i + 1  x = i * 2 Loop

x > 26是循环的退出条件，如果没有退出条件，则是死循环，程序一直运行下去，直到内存消耗尽。

2、Do...Loop Until

Do  i = i + 1 x = i * 2Loop Until x > 26

Do循环退出的条件也可以放在Loop后面。两个代码返回同一个结果x=28。

---

3、Do While...Loop

Do While x <= 26 '当x<=26的时候才执行循环 i = i + 1 x = i * 2Loop

除了Until连接条件，还可以用While连接条件。两种意思一样。上述代码结果同样是x=28。

当然，While同样可以写在Loop后面。

Do i= i + 1 x = i * 2Loop While x <= 26

---

4、小练习：用For循环和Do循环提取成绩大于等于80的所有数据。

For循环参考代码：

For循环

Do循环参考代码：

Do循环

---