What does On Error Goto 0 do?


Lars Brownies

In inherited the code beneath. I never use the GoTo option other than for
the err_handler.

What does the code
<<On Error GoTo 0>>
actually do?

Is it necessary or can it be written in a better way?


Function pfCompactRepairDB(strSource As String, strDestination As String) As
On Error GoTo Err_Handler
pfCompactRepairDB = Application.CompactRepair(LogFile:=True,
SourceFile:=strSource, DestinationFile:=strDestination)

' Reset the error trap and exit the function.
On Error GoTo 0
Exit Function

pfCompactRepairDB = False
Dim strError As String
strError = "Error: " & Err.Number & ": " & Err.Description
MsgBox strError: Call ErrorLog("Generic", "pfCompactRepairDB", strError)
End Function

Tom van Stiphout

On Sun, 30 Aug 2009 00:07:42 +0200, "Lars Brownies"

There is a comment line above it that explains it.
However, there is no benefit in resetting the error handler if you're
on your way out anyway. Delete both lines.

Microsoft Access MVP

David W. Fenton

On Error GoTo 0 turns off error handling for the current proc.

Er, it turns off the error handler declared for the procedure, and
returns error handling to the default VBA error handler.

The most common use for it is after:

On Error Resume Next

....which turns off both any local error handler and the default VBA
error handler. A typical usage (which I don't endorse):

On Error Resume Next
DoCmd.OpenReport "rptMyReport"
On Error GoTo 0

What this does is allow the report to run and if an error occurs
(such as it returning no data and automatically closing because of a
NoData event that closes it), completely ignores it.

I prefer to trap for the particular error you expect, and ignore
that one error, because you can never be sure that the error you're
ignoring is the one you expected and are aware you want to ignore.

In short, my code includes neither of those On Error statments. The
only On Error statements I use are:

On Error GoTo errHandler
On Error Resume exitRoutine

I think either of the other two statements are evidence of less than
rigorous programming practice.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question