(20/08/2022, 00:11)berduş yazdı: aşağıdaki kodu dener misiniz?
Resim.Picture = ""
xYol = Application.CurrentProject.Path & "\" & Me.arama & ".JPG"
If Len(Dir(xYol) & "") > 0 Then Resim.Picture = xYol Else MsgBox "resim bulunamadı"
Denedim çalıştı hocam. Bu kodu yeni biri olarak yazmamın imkanı yoktu. Araştırmada hiç denk gelmedim. Çok Teşekkür Ediyorum.