Hola!

Hasta donde sé, no hay forma de hacer eso.

Pero, lo que puedes hacer, es utilizar el "On Error Goto Etiqueta". De esta forma, puedes segmentar el codigo. Mientras mas etiquetas pongas, mayor "precisión" tendrás de dónde ocurre el error.

Otra cosa "rápida", no se me ocurre ahora...

Saludos!

Erl()???? vaya no lo conocia en verdad... gracias Seba, lo busque en el tio google y pues lo encontre, es cierto que debe añadirse numeros de linea, ya que sin ello la funcion Erl() devolvera cero, pero ello no supone problema si usamos la herramiena MZTools3VB6Setup descargable desde microsoft, es una muy buena herramienta que nos permite por ejemplo analizar el codigo, ver variables o modulos fantasmas y entre otras cosas muy utiles enumerar automaticamente todo un procedimiento que es lo que necesita esta rara y funcion Erl(), lo he probado con el siguiente codigo básico:

Un Command1 en un Form1

Private Sub Command1_Click()
10     On Error GoTo error
       Dim c As Integer
       Dim a As String
20     a = "hola"
30     a = "una linea mas"
40     c = 5 / 0 'provocamos el error
50     Exit Sub
 
error:
60     MsgBox Err.Description & " detectado en la linea:" & Erl()
End Sub
 

y pues funciona como queria exactamente, otra vez gracias... asi podre perfeccionar aun mas mi proyecto, y a lo de hacer un codigo sin errores, recordad que no existe ni existira programa perfecto.

Un saludo.