vb6 - 发生错误时如何重新运行我的程序[Vb6]

Question

发生错误时如何重新运行程序[Vb6]？

Answer 1

在VB6中，您可以选择通过启动表单或调用某些全局“主”例程(在项目设置中)来启动程序。选择后一个选项(全局Main例程)。

在全局主例程中，使其类似于以下内容:

Public Sub MyMain()
    On Error Goto errHandler
    frmMain.Show
    Exit Sub
errHandler:
    Unload frmMain
    Resume
End Sub

Resume将在导致错误的同一行重新启动，并且由于实际上只有一行，因此它将始终加载相同的表单。

这假设您有一个名为 frmMain的主要形式，并且可以成功通过 Form_Load子例程。