(25/08/2017, 01:00)direnist yazdı: Merhaba ogzcntrk;
KISI_ID_AfterUpdate() olay yordamına yazdığınız aşağıdaki kodu

Kod:

Private Sub KISI_ID_AfterUpdate()  Me.txt_adsoyad.Value = DLookup("AdSoyad", "tbl_kisi", "ID=" & [KISI_ID])End Sub

Şu şekilde yazarak deneyiniz.

Kod:

Private Sub Form_Current()  Me.txt_adsoyad.Value = DLookup("AdSoyad", "tbl_kisi", "ID=" & [KISI_ID])End Sub

İyi çalışmalar.

Kodları yazan ellerinize sağlık. Sizin yazdığınız gibi değiştirince çalıştı. Allah razı olsun.