Error Handling

[()InDiGo)))>]

Hi,
could some one please tell me how to write error handling procedures more efficiently? rather then putting an error handling statement within each function or sub like (each error handling code will be the same):

Public Sub test()
on error goto hell
Some code goes here
exit sub

:hell
error handling code
End Sub

Public Sub testa()
on error goto hell
Some code goes here
exit sub

:hell
error handling code
End Sub

thanx

[oetje]

I think it's not possible with vb6. Maybe it's possible with vb7.

[()InDiGo)))>]

no this is a sign os a "bad" programming language... i'm writing an app with lots of calls to the api so error handling will become tedious...

well i guess i'll have to wait for VB7