如何实现让窗口在执行完任务后自行退出(而不是通过点击退出按钮执行unload)？

如题。

解决方案 »

  1.   

    unload 窗口名如： unload Form1
      

  2.   

    在任务后面加一段退出的代码
    如：end
        unload me
      

  3.   

    我在任务后执行Unload Me，可是返回“上下文中不能卸载”的错误，请最好将解决方法用代码表示。
      

  4.   

    如果你点击退出按钮(假设是 cmdExit)正常的话，请加下面的：call cmdExit_click
      

  5.   

    过程的最后一段代码为unload me,在end前面。
           貌一新      央各
      

  6.   

    估计你是在异步处理事务，事务没有处理完，你就想unload me，建议你判断事务是否处理完再unload me。
      

  7.   

    on error goto endpoint
    endpoint:
    unload me
      

  8.   

    或 用api 函数:
    sendmessage form1.hwnd,wm_close,0,0