Trouble loading pictures

If I change directory or folder name picture does not load.

On Error GoTo picss
If prin <> Empty Then

    Image1.Picture = LoadPicture("D:\Faheem Khalid\STEP\STEP 2024\Self Assessment Test 2024\Self Assessment Test 2024\Pictures" & prin & ".JPG")
    
Else

picss: MsgBox ("Please Upload Student's Picture"), vbCritical, "Information"

f = MsgBox("Print Form without Picture", vbYesNo, "Help")
If f <> 6 Then
    Unload Me
    frmform.Show
 Exit Sub
End If

End If