同意Amoon(阿木)的说法,例如你在循环中判断Ex这个函数是否True,True则退出,在外部改变Ex这个函数的值来控制循环。

解决方案 »

  1.   

        '你要结合一楼和二楼的说法才行,在循环中没有DoEvents可能在循环过程中就无法响应系统了(比如按钮按下之类的动作)'        Tip:其实很多问题在以前的贴子里都有过很好的解答,我建议大家提问前先搜一下以前的贴子,会节约很多时间的.
    '
    '     Author:吴文智
    '       Date:2001-11-15
    'Description:要试用本例请在窗体中填加一个按钮
    '            然后在代码窗体中粘贴如下代码
    '            Good luck!Option Explicit'这个条件变量要定义成窗体级,就是各个过程都可以访问
    Private RunCondition As BooleanPrivate Sub Test()
        RunCondition = True
        Do While RunCondition
            DoEvents
            '做所需的操作
        Loop
    End SubPrivate Sub Command1_Click()
        RunCondition = False
    End Sub