(27/01/2019, 02:14)ozanakkaya yazdı: Benim son eklediğim örnekte, adı metin kutusunun tuşa basıldığında olayındaki koda sadece adı alanının verisinin aktarılması için

Private Sub adi_KeyDown(KeyCode As Integer, Shift As Integer)



Select Case KeyCode

       Case vbKeyReturn

             KeyCode = 0

             Forms![F_006_PortfoyTanimlama]![txtAdiSoyadi] = Me.adi

             

             DoCmd.Close acForm, "F_001_MusteriListesi"

             

    End Select





End Sub

Şeklinde kod eklendi, üstteki kodda sadece adı alanı aktarılıyor, diğer iki alanın aktarılması için ekleme yapmanız gerekiyor. Resmini eklediğiniz kod, adı alanının tıklandığında olayına yazılmış. Adı alanını tıkladığınızda 3 metin kutusundaki veriyi aktarıyor.

Özür dilerim gece gece tuşa basıldığı olayı gözümden kaçmış. Ben kendi örneğimdeki olaydan devam ediyoruz diye tuşa basıldığı olayını kaçırmışım.

---

Allah size sabır versin ne diyim söyleyecek başka bir şey bulamıyorum.

---

Teşekkür ederim sonunda halledebildim.