Option Explicit 'Option Compatible Sub Main Dim a, b() _ErrorHandler(False) ' DebugPrint vbLF ' TraceConsole() exit sub End Sub