KISI_ID_AfterUpdate() olay yordamına yazdığınız aşağıdaki kodu
Private Sub KISI_ID_AfterUpdate()
Me.txt_adsoyad.Value = Dlookup ("AdSoyad", "tbl_kisi", "ID=" & [KISI_ID])
End Sub
Şu şekilde yazarak deneyiniz.
Private Sub Form_Current()
Me.txt_adsoyad.Value = Dlookup ("AdSoyad", "tbl_kisi", "ID=" & [KISI_ID])
End Sub
İyi çalışmalar.