Welcome to the Lounge

try {
    // 8,000 lines of nested crap
} catch (Exception ex) { }

try {
    // A single line of code
} catch (Exception ex) { }
try {
    // A single line of code
} catch (Exception ex) { }
try {
    // A single line of code
} catch (Exception ex) { }
try {
    // A single line of code
} catch (Exception ex) { }
try {
    // A single line of code
} catch (Exception ex) { }
try {
    // A single line of code
} catch (Exception ex) { }
try {
    // A single line of code
} catch (Exception ex) { }
... repeated 8000 times...

On Error Goto ErrorHandler
' 8,000 lines of really bad VB
ErrorHandler:
MsgBox err 'can't remember format
resume 'yup, goes back to the line what errored!

Try
   ' Code... Mostly like:
   Dim sCode As String = 123 ' Yes, this is possible with Option Strict Off (the default).
   Dim Id As Integer ' From hungarian to PascalCase...
   Dim someOtherVar As String ' And then correct camelCast, all in one method.
Catch (ex As Excpetion)
   Log(Err.Message) ' Err, because why use ex?
End Try