Do循环是一种灵活的循环结构，用于重复执行一段代码，直到满足特定条件。它比For循环更适合不确定循环次数的场景（如等待某个条件成立）。
第1个：do无限循环
do 循环的内容... Loop '无限循环体
无限循环
第2个：Do While...Loop（先判断后执行）
先检查条件，若条件为True，则执行循环体;每次执行完循环体后，会重新检查条件;当条件为False时，退出循环.
Do While 条件 ' 要执行的代码Loop
do while
第3个：Do...Loop While（先执行后判断）
Do ' 要执行的代码Loop While 条件
第4个：Do Until...Loop（先判断后执行，条件相反）
与Do While相反：条件为False时执行循环体;条件为True时，退出循环.
Sub untilms()Dim n%, i%n = 2 '从第2行开始Do Until i = 3 '当3等于3结束 条件成立结束If Cells(n, 2) = 10 Then '单元格的n行B列查询数据 Cells(n, 2).Interior.ColorIndex = 5 i = i + 1 'i累加1End Ifn = n + 1 'n值累加LoopEnd Sub
第5个:Do...Loop Until（先执行后判断，条件相反）
Do ' 要执行的代码Loop Until ‘条件
第6个：总结说明
