解决方案 »

  1.   

    exit sub
    没有看明白你写的什么意思。
      

  2.   

    VB.NET可以丢出一个异常:
    Try
        a()
        b()
        c()
    Catch
    End TrySub b()
        Throw New Exception
    End Sub
    这样c就不执行了。VB6不支持结构化异常,当然也不支持多线程。
      

  3.   

    抱歉,我表达得不太明白,主要是想类似 End 的功能
    不结束 整个程序,类似于 C语言的 EXIT(0)
    就像放电影 的 播放 停止按键 ,而不是类似 END 的关闭电源
    表达能力不太好
      

  4.   

    我只要 类似 End 的功能,但需要 结束整个程序,只是结束所有执行中的代码
      

  5.   

    private sub command1_click() 
      if not a() then exit sub
      if not b() then exit sub
      ...
    end sub
    function a() as boolean
      ...
      a = true '正常结束
    end function
    function b() as boolean
      if 条件成立 then exit function '立即中断
      ...
      b = true '正常结束
    end function