例子1：
//支持Exit Do 命令退出循环
i=0
Do While i=0
    Msgbox "我停不下来啦!!快住手"
Loop
//当循环条件成立的时候，反复执行循环体


例子2：
i=0
Do Until i=0
    Msgbox "为什么没有循环到我呢？"
Loop
Msgbox "循环结束"
//当循环条件成立的时候，离开循环体


例子3：
i=0
Do Until i=1
    Msgbox "我停不下来啦!!快住手"
Loop
//当循环条件不成立的时候，反复执行循环体


例子4：
n=0
Do While true
    Msgbox "我将循环10次停下来!!"
    If n>=10 Then
        //当循环条件成立的时候，离开循环体
        Exit do
    End if
    n=n+1
Loop
Msgbox n & "次"


例子5：
i = 0
Do 
   MessageBox "ok"
Loop While i <> 0
//条件放后面，前面的循环内容可以执行一次！

无