Mentre aspetto un vs aiuto l'unica cosa che girando sul web ho trovato è che nelle varie righe di codice si potrebbe inserire una etichetta e nella gestione errore inserire la funzione erl

Es:

codice:
Dim x As Integer                'Dichiariamo la nostra variabile
10:
          On Error GoTo ErrorTest
11:
          x = 5 / 0                       ' Divido per 5 cosi mi restituisce un errore
12:
          Exit Sub

ErrorTest:
          MsgBox "Errore in linea #" & Erl
          Resume Next
      End Sub
Con questo metodo è vero che mi dice la posizione esatta dell'errore ma se devo fare una etichetta per ogni riga il codice finale del progetto sara il doppio di quello reale e quindi un vero casino. Non è che per caso esista qualke funzione dell' oggetto err o qualke api che nn conosco o qualke proprietà di vb6 che risolva il mio problema?