例子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  

//条件放后面，前面的循环内容可以执行一次！

无