Errors[resolved]

Ok i'm trying to trap the incorrect path error but this code allways displays the error evan if the image is loaded!

VB Code:

Private Sub CmdLoad_Click()
On Error GoTo handler:
 
OriginPic.Cls
OriginPic.Picture = LoadPicture(txtPath.Text)
OriginPic.Refresh
 
handler: MsgBox "Please Make sure Path IS Correct"
End Sub

Exit Sub right before the handler label

Pino,

it's a too basic error... sorry... ;)

VB Code:

Private Sub CmdLoad_Click()
On Error GoTo handler:
 
OriginPic.Cls
OriginPic.Picture = LoadPicture(txtPath.Text)
OriginPic.Refresh
 
[b]exit sub[/b]   '<--- it's missing...
 
handler: MsgBox "Please Make sure Path IS Correct"
End Sub

JL

your right that was too basic, i think its time i left the computer alone for a bit :( thanks guys

And for multi error handling...

VB Code:

On Error Goto Sample1
'blah blah
 
On Error Goto Sample2
'blah blah
   Exit Sub/Function
 
Sample1:
   'handle
   'Err.Clear
   Exit Sub/Function
 
Sample2
   'handle
   'Err.Clear
   Exit Sub/Function