Hepsi iyi de, bulunan kaydın diğer kayıtlardan ayrılan bir farklılığı, benzersiz kayıt olmasını sağlayan bir ayırıcı tarafı yok ki.. Arama işlemi sonucunda gelen kayıtlarınızın kimlikid alanları arama işleminde gözardı edilmiş. Arama ekranında tıklanan kaydın diğer kayıtlara göre tekrarlanamaz bir özelliğinden hareketle bulunan kaydı açtırabilirsiniz. Tablolarınıza baktığımda ilişkilerle ilgili sıkıntılar var. Önce ilişkileri neye göre kurmanız gerekli onu belirleyiniz. Arama işlemi sonunda gelen verilerin benzersiz bir değerle gelmesini sağlarsanız işiniz hallolur. Daha sonra komut düğmesinie şu kodları yazın:
Kod:
Dim formadi As String
Dim deger As String
formadi = "Yil"
deger = "[Kimlik]=" & Me![Data.eburosayisi]
DoCmd.OpenForm formadi, , , deger