【www.gbppp.com--格言语录】

 　　一、Do Until语法

　　第一种语法：

　　Do Until 条件式

　　条件式为True为止，循环处理

　　Loop

　　第二种语法：

　　Do

　　条件式为True为止，循环处理

　　Loop Until 条件式

　　二、Do Until的例子

　　下面分别针对如上的两种语法，给出相应的例子：

　　如下代码功能为："单元格A1～A10内，填入1～10

　　i = 1

　　Do Until i = 11

　　Worksheets("Sheet1").Cells(i, 1).Value = i

　　i = i + 1

　　Loop

　　如下代码的功能为："单元格A1～A10内，填入1～10

　　i = 10

　　Do

　　Worksheets("Sheet1").Cells(i, 1).Value = i

　　i = i + 1

　　Loop Until i = 11

本文来源：http://www.gbppp.com/rszl/532756/