pls have a look at the code below....
Private Sub Command1_Click()
On Error GoTo errtrap
For i = 0 To 2
Err.Raise 2000, "Src", "Error " & i
l1:
MsgBox i
Next i
Exit Sub
errtrap:
Err.Clear
GoTo l1
End Sub
the process requiremnt is that whenever a error...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.