有强制结束的办法么 而且不会报错的

解决方案 »

  1.   

    用下面的代码,关闭窗体所有进程,不再驻留内存.
    Private Sub Form_Unload(Cancel As Integer)
       If Not 窗体名 Is Nothing Then
       Unload 窗体名
       End If
    End Sub
      

  2.   

    可能是有隐藏的窗体没有关闭,程序退出之前应先关闭,方法是添加如下事件:Private Sub MDIForm_QueryUnload(Cancel As Integer, UnloadMode As Integer)
         Unload 窗体名     '卸载隐藏的窗体End Sub另外需要注意的是,请把MDI窗体的AutoShowChildren属性设置为False