VB Error Handling

Mayuri — Thu, 22 Jan 2009 07:03:18 +0000

While execution of my program’s exe, the EndUser sometimes get run time error or application defined error etc., which are not handled by me in my code.
So, in each & every ‘Sub’ or ‘Function’, before ‘End Sub’ or ‘End Function’, I have put these lines…

If Not Err.Number = 0 Then
MsgBox Me.Name & ” – < sub or function name >” & VBA.Chr(13) & Err.Number & ” – ” & Err.Description
End If

for e. g.,
Private Sub Form_Load()
On Error GoTo Er
.
.
.
Er :
If Not Err.Number = 0 Then
MsgBox Me.Name & ” – Form_Load” & Chr(13) & VBA.Err.Number & ” – ” & Err.Description
End If
End Sub

Now, my question is how to know that exactly what is the line number in the code, where this error is raised. So, I can show that line number or line code in error message, which finally end-user can inform me.

IT Answers » Error control

VB Error Handling