Tek form görünümü istiyrsunuz herhalde
evet tam olarak istediğim buydu. ama yeni kayıt eklenmiyor.
teşekkür ederim istediğim şekilde olmuş. nasıl yapıldığı hakkında bilgi verirseniz sevinirim. şimdiden teşekkürler.
İlk olarak Tablo2 yi Tablo1 ile ilişkilendirebilmek için KisiID adında bir alan ekleyip ilişkilendirme işlemini ayarladık.
Daha sonra anaform üzerinde formac isimli butonun tıklandığı olayına aşağıdaki kodu yazdık
Private Sub formac_Click()
Dim cnr As String 'Değişkenleri belirledik
Dim kriter As String
cnr = "form"
kriter = "[KisiID]=" & Me![Kimlik] 'Açılacak formun hangi kritere göre veri getireceğini ayarladık
DoCmd.OpenForm cnr, , , kriter 'Formu açtırdık
End Sub
Daha sonra veri ekleyebilmemiz için açılan form üzerine görünür özelliği gizli olan KisiID isimli bir metin kutusu ekleyip, Formun ekleme öncesinde olayına aşağıdaki kodu yazdık.
Private Sub Form_BeforeInsert(Cancel As Integer)
KisiID = Forms!anaform.Form!Kimlik ' Ekleme öncesinde KisiID alanının değeri anaform üzerindeki Kimlik değeriyle aynı olsun dedik
End Sub
Hepsi bu kadar...
Sanırım anlatabilmişimdir...