Errors[resolved]

[Pino]

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

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

[leinad31]

Exit Sub right before the handler label

[Jlarini]

Pino,

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

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

[Pino]

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

[leinad31]

And for multi error handling...

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