UC知道vb再这段程序中为什么捕捉不到错误？而继续提示错误呢？
来源：百度知道 编辑：UC知道 时间：2024/06/02 02:24:10
On Error GoTo handle1
Dim o As Integer
For o = 0 To Web.UBound
If xuanxiangka(o).Value = True Then
Web(o).GoBack
End If
Next
Exit Sub
handle1:
MsgBox "反正就是错了……"
想了半天，脑子就转不过弯了……？
这段程序，在错误是应该提示"反正就是错了……"，但却不提示这个，而直接vb提示错误，然后不得不结束……
Dim o As Integer
For o = 0 To Web.UBound
If xuanxiangka(o).Value = True Then
Web(o).GoBack
End If
Next
Exit Sub
handle1:
MsgBox "反正就是错了……"
想了半天，脑子就转不过弯了……？
这段程序，在错误是应该提示"反正就是错了……"，但却不提示这个，而直接vb提示错误，然后不得不结束……
编译错误么？？
什么错误？实时错误-1？如果是的话……没有办法 webbrowser的问题。编译以后就不会出现问题了 不用担心~~
晕啊
Private Sub Command1_Click()
'On Error Resume Next
On Error GoTo handle1
Dim o As Integer
For o = 0 To Web.ubound
If UBound(xuanxiangka) <> 0 Then
If xuanxiangka(o).Value = True Then
Web(o).GoBack
End If
End If
Next
Exit Sub
handle1:
MsgBox "反正就是错了……"
End Sub
end sub