循环语句求教，谢谢！！！

Question

循环语句求教，谢谢！！！for i=0 to 5
我想在每循环一次后，判断AAA=TRUE ,如为TRUE,就继续循环，如为FALSE,就等待，直到为TRUE，再继续循环
next i
谢谢！！！

Answer 1

for i=0 to 5
  if AAA=false then
    do until AAA=true
      doevents
    loop
  end if
next i

Answer 2

For i = 0 To 5
    Do Until AAA
      DoEvents
    Loop
Next i

Answer 3

up---------------------------------------------------------------------------------------------
腰缠70元到月入近10万
http://www.hunbei.com.cn/Article/ArticleShow.asp?ArticleID=453IT工程师 毕业4年我年薪涨到30万 
http://www.hunbei.com.cn/Article/ArticleShow.asp?ArticleID=51126岁青年坐拥千万域名资产 从小玩家变成CEO 
http://www.hunbei.com.cn/Article/ArticleShow.asp?ArticleID=515程序员的酸甜苦辣：告别Coding 
http://www.hunbei.com.cn/Article/ArticleShow.asp?ArticleID=341从月薪3500到700万（一）
http://www.hunbei.com.cn/Article/ArticleShow.asp?ArticleID=170网络草根月赚3000的十种方法
http://www.hunbei.com.cn/Article/ArticleShow.asp?ArticleID=517如果我是女的 我肯定不会嫁给做网站的
http://www.hunbei.com.cn/Article/ArticleShow.asp?ArticleID=512

Answer 4

1:do while AAA
   DoEvents
   [你的代码]
loop
2：
do Until AAA = true
   DoEvents
   [你的代码]   
loop

Answer 5

up---------------------------------------------------------------------------------------------
腰缠70元到月入近10万
http://www.hunbei.com.cn/Article/ArticleShow.asp?ArticleID=453IT工程师 毕业4年我年薪涨到30万 
http://www.hunbei.com.cn/Article/ArticleShow.asp?ArticleID=51126岁青年坐拥千万域名资产 从小玩家变成CEO 
http://www.hunbei.com.cn/Article/ArticleShow.asp?ArticleID=515程序员的酸甜苦辣：告别Coding 
http://www.hunbei.com.cn/Article/ArticleShow.asp?ArticleID=341从月薪3500到700万（一）
http://www.hunbei.com.cn/Article/ArticleShow.asp?ArticleID=170网络草根月赚3000的十种方法
http://www.hunbei.com.cn/Article/ArticleShow.asp?ArticleID=517如果我是女的 我肯定不会嫁给做网站的
http://www.hunbei.com.cn/Article/ArticleShow.asp?ArticleID=512

Answer 6

For i = 0 To 5
  While Not AAA
    DoEvents
  Wend
  '这里放置 AAA 为 True 时的代码
Next i

Answer 7

for i=0 to 5
     do until aaa=true
        doevents
     if aaa<>true
        doevents
        [使得aaa = true的代码]
     end if 
     loop
next

Answer 8

纠正，上面写错了，一打盹，提交上去了，哈哈
for i=0 to 5
     do until aaa=true
        doevents
     loop
     if aaa<>true
        doevents
        [使得aaa = true的代码]
     end if 
     
next