Loadpicture not working

I'm really struggling with this one! I have a userform which amongst other things contains two Image Placeholders; Image1 and Image2. When I click on an item in the ListBox1 this should then change the images of both placeholders based on what item they have clicked on in the listbox. The code I have placed below works for Image1 but no Image 2 even though it's the same code! For context, the listbox populates other textboxes on the userform. I have defined a range on the sheet as 'myName' which is used for Image1. I have defined another range as 'vicName' which is for Image2. When I click on an item in the listbox the code will then take the value of the listbox and then search for the matching name in a folder found in the workbook path. I'm just very confused as to why this works for one image but not the other! Any suggestions would be greatly appreciated!

Private Sub listBox1_Click()
      
      Dim EmpFound As Range
      Dim vicFound As Range
      Dim fPath As String
      Dim vfPath As String

With Range("myName")
        Set EmpFound = .Find(ListBox1.Value)
        On Error Resume Next
        If EmpFound Is Nothing Then
            Image1.Picture = LoadPicture(fPath & "nopic.gif")
        Else
            With EmpFound
                'Look in the directory where this workbook is located.
                fPath = ThisWorkbook.Path & "\Pictures\"
                On Error Resume Next
                'If a matching picture is found then display it.
                Image1.Picture = LoadPicture(fPath & "\" & ListBox1.Value & ".jpg")
                'If No picture found then display the default picture.
                If Err = 0 Then Exit Sub
                
           Image1.Picture = LoadPicture(fPath & "nopic.gif")
   
   With Range("vicName")
        Set vicFound = .Find(VictimDetailsMain.tbName.Value)
        On Error Resume Next
        If vicFound Is Nothing Then
            Image2.Picture = LoadPicture(vfPath & "nopic.gif")
        Else
            With vicFound
                vfPath = ThisWorkbook.Path & "\Pictures\Victims"
                On Error Resume Next
                Image2.Picture = LoadPicture(vfPath & "\" & VictimDetailsMain.tbName.Value & ".jpg")
                If Err = 0 Then Exit Sub
         Image2.Picture = LoadPicture(vfPath & "nopic.gif")
   
    Set EmpFound = Nothing
    Set vicFound = Nothing

      
 End With
 End If
 End With
 End With
 End If
 End With

End Sub

EmpFound works, but vicFound doesn't. It won't even load the 'nopic.gif'!

Any Thoughts?

Suggest putting a break on the Image2. Picure = .....

and use the Immediate pane to see what vfPath & "\" & VictimDetailsMain.tbName.Value & ".jpg" really evaluates to!

Thank you all for the suggestions so far. Would someone mind explaining how to use the break point? I've never managed to understand how to use the debugging tool properly!

I've adjusted the code for both parts to that shown below. The new problem is that it will display a picture now for both images, but if I click on a listbox item that doesn't have a caption associated, then instead of displaying the 'nopic' file it continues to show the last image loaded until I click on an item that does have a caption and an associated file to replace it...any ideas?!

   With Range("vicName")
        Set vicFound = .Find(lblVictimName.Caption)
        vfPath = ThisWorkbook.Path & "\Pictures\Victims\"
        On Error Resume Next
        If vicFound Is Nothing Then
            Image2.Picture = LoadPicture(vfPath & "nopic.gif")
        Else
            With vicFound
                vfPath = ThisWorkbook.Path & "\Pictures\Victims"
                'On Error Resume Next
                Image2.Picture = LoadPicture(vfPath & "\" & lblVictimName.Caption & ".jpg")
                If Err = 0 Then
                Image2.Picture = LoadPicture(vfPath & "nopic.gif")
   End If
   
   End With

Highlight the line and press F9. This will make the macro break just before the line is executed and you can use the Immediate pane to print out what the expersssion evaluates to, i.e.,

?vfPath & "\" & lblVictimName.Caption & ".jpg" in the immediate pane will show you what the expression will evaluate to.

I find the break very valuable in debugging to see what is going on. After veiwing in the immediate pane, press F5 for the macro to continue executing.