Error Handler - Exit Sub vs. End Sub

Question

¿Por qué querría salir de un Error Handler (después de la manipulación) con un Sub de salida en lugar de simplemente dejarlo ir al End Sub?

Estoy seguro de que es simple. Simplemente no entiendo. Gracias por cualquier ayuda.

Ejemplo:

Public Sub SubA() 
On Error Goto ProcError 

    ''# other code 
    MsgBox FuncA() 

ProcExit: 
    Exit Sub 

ProcError: 
    MsgBox Err.Description 
    Resume ProcExit 
End Sub 

Answer 1

Su etiqueta ProcExit es su lugar donde libera todos los recursos, ya sea que haya ocurrido un error o no. Por ejemplo:

Public Sub SubA() 
    On Error Goto ProcError 

    Connection.Open 
    Open File for Writing 
    SomePreciousResource.GrabIt 

ProcExit: 
    Connection.Close 
    Connection = Nothing 
    Close File 
    SomePreciousResource.Release 

    Exit Sub 

ProcError: 
    MsgBox Err.Description 
    Resume ProcExit 
End Sub 

Answer 2

Normalmente, si usted tiene conexiones de bases de datos u otros objetos declararon que, tanto si se utilizan de forma segura o creado antes de su excepción, tendrá que ser limpiado (se desechará), entonces la devolución de su error El manejo del código de regreso al punto de entrada ProcExit le permitirá hacer su recolección de basura en ambos casos.

Si se sale de su procedimiento al caer en la salida Sub, puede correr el riesgo de tener una acumulación de objetos instanciados que están sentados en la memoria de su programa.