如何强制退出程序而不出错？

Question

串口读数据并写数据库，我想退出，即close相关串口和数据对象 并 nothing了
使用unload me，并没有退出， end 会提示错误进入vc调试？怎么办？

Answer 1

用:on error resume next试过吗?

Answer 2

我遇到过这种问题，具体是什么原因也不太清楚。不过用这个方法解决了:在你的主FORM上加入：
Private Sub Form_Unload(Cancel As Integer)
   
    On Error Resume Next
    Dim Frm As VB.Form    For Each Frm In Forms
        If Frm.name <> Me.name Then Unload Frm
    Next
End Sub