Keramet çerçevede değil olay vb kodlarında Yandemir hocamın göndermiş olduğu kodları formunuzun kod paneline yapıştırın ve txtbox isimlerini kodlardakiler ile aynı yapıp olayları seçmeyi unutmayın.
Sub ResimYukle()
On Error Resume Next
Resim.Picture = CurrentProject.Path & "\Bos.jpg"
Resim.Picture = CurrentProject.Path & "\" & Me.Ad& " " & Me.Soyad & ".jpg"
End Sub
Kolay gelsin.