Error trapping in vb6

[stoymigo]

When I run the following code, it gives me a "Division by zero" error, the thing I'm wondering is why doesn't it go to the error handler, even though I have one.

Private Sub Form_Load()
1         On Error GoTo Form_Load_Error
          Dim iValue As Integer
2         iValue = 5 / 0 'bombs out
3         MousePointer = vbHourglass
4         MousePointer = vbDefault
5         On Error GoTo 0
6         Exit Sub

Form_Load_Error:
7         MsgBox "Line: " + CStr(Erl) + " Error " & Err.Number & " (" & Err.Description & ") in procedure Form_Load of Form Form1"

End Sub

 

[LithIX]

Omg, I'm getting horrendous flasbacks...

How 'bout: "on error resume next" lol...

Honestly, its been millinia since my vb days, and I can't remember how to solve that issue. Sorry!

Good luck though!


Sent from my GT-I9100 using Tapatalk

 

[biometrics]

Perhaps your error handler has an error? Does erl exist?

 

[walterl]

Your code works fine, it calls the error handling on my pc

 

[dabean]

If I remember correctly you have to set the IDE to only break on unhandled errors. Check in the options somewhere.

 

[walterl]

check tools-> options-> general, if error trapping is set to "break on all errors", change to break in class module or on unhandled errors

 

[stoymigo]

Yep, changing from "break on all" to something else fixes this.

 

[dequadin]

Don't forget:

OPTION STRICT ON

 

[stevenv]

Please tell me this is a legacy application you're supporting.

 

[stoymigo]

Please tell me this is a legacy application you're supporting.

I work on a legacy application, but this example was for learning purposes.

 

[_kabal_]

eesh, imagine using VB daily....

 

[biometrics]

eesh, imagine using VB daily....

VB6 was the best thing ever. Why the hate?

 

[Lounger]

VB6 was the best thing ever. Why the hate?

That code is full of dust it's so old.

Why does he have 'On error' twice?

 

[walterl]

he doesn't need the second 'on error', probably put it in there while he was debugging his issue

 

[biometrics]

That code is full of dust it's so old.

Why does he have 'On error' twice?

Oh please. It's clearly academic code that has no use.

 

[stevenv]

on error resume next
on error resume next //meant it this time