怎样用一个按钮控制do while循环终止?即按一下按钮退出循环

Question

加一个布尔型的判别值呀
在循环里有
doevent

Answer 1

一个模块级的变量jx=true
...
do while true
   ...
   doevents
   if not jx then exit do
   ...
loop
...在按钮事件中
jx=false

Answer 2

do while true
  ...
  Sleep(3)
  if not j then exit do
  ...
loop
button1_Click()
END SUB
用SLEEP函数更好!!!!

Answer 3

回复人：　thirdapple(第三只苹果)　(2002-1-2 17:22:26)  得0分 
do while true
  ...
  Sleep(3)
  if not j then exit do
  ...
loop
button1_Click()
END SUB
用SLEEP函数更好!!!!  好在何处？
千万别上当！