Hello

When a item is selected from a list box, I want to display an image in a picturebox which matches the the item selected. (Managed to do that).
Then if that file is not available, I would like to call up another image to display instead. This is what I have so far. It displays the image if it is there but if it is not available nothing changes.

Private Sub Listbox_Click()

a = Listbox.Text
On Error Resume Next
 Section_pic2.Picture = LoadPicture("G:\Design\clinton\Calculator\New Pictures\" & a & ".jpg")
On Error GoTo 0
If Section_pic2.Picture Is Nothing Then
Section_pic2.Picture = LoadPicture("G:\Design\clinton\Calculator\New Pictures\No Image.jpg")
End If
End Sub
Sorry if it is a bad post as this is my first.