主题：报错后跳转

 这个意思？

on error resume Next

For i As Integer = 1 To 10
    If i = 5 Then
        Dim n As Integer = "abc"
        msgbox("上面这句代码会报错")
    Else
        output.show(i)
    End If
Next