lwd0512的专栏

原创 关于VB6同一过程中不能第二次捕获到错误的问题

 Private Sub Form_Load()Dim I As Long, J As Long, M As Long这里特意制造了一个除数为0的错误lab1: On Error GoTo err1I = 5: J = 0M = I / Jerr1:    GoTo lab1End Sub 以上是很简单的一段代码。第一次出现错误是能正常捕获到的，并且进入err1的错误处理程序，顺利转到l