应用程序关不掉，帮帮忙！

Question

我写了个小应用程序，但关闭后【任务管理器】的【应用程序】栏里经常有该程序还在运行，如果再打开就会提示“该程序已经运行”，【结束任务】后再打开就正常了，怎么回事啊？？明白的指点指点，是不是结束时该关闭的没关闭，会是什么呢？好像不是必然出现

Answer 1

估计你是没有完全关闭在你的程序close事件中加入end，Private Sub Form_Unload(Cancel As Integer)
  End
End Sub
看看这样行不

Answer 2

估计是你的对象没有完全释放掉，用End强制退出

Answer 3

用end 退出是可以了，但在任务栏上点右键然后关闭时会出错
应用程序发生异常unknown software exception(0xc000008f),位置为ox77e8bc3f
这是为什么呢，还是因为有对象没关闭吗？有时有对象没关闭也不会这样啊

Answer 4

Public Sub onExit()
    On Error Resume Next
    Dim i&
    For i = Forms.Count - 1 To 0 Step -1
        Unload Forms(i)
    Next i
End SubPrivate Sub Form_Unload(Cancel As Integer)
    onExit
    End
End Sub我一般是这么做的。。