Öncelikle,
eklediğiniz örnek uygulama üst sürüm olması nedeni ile inceleme imkanım,kendi adıma söz konusu olmamaktadır fakat,
Alıntı:Son zimmetlene kaydı Açılan_Kutu1468'e seçili halde getirebilirsek
İfadenize yönelik olarak;
Eğer Açılan_Kutu1468 adlı combobox üzerinde son eklenen kaydı göstermek istiyorsanız bunun için iki yöntem kullanılabilir.
YÖNTEM 1
Formun GEÇERLİ OLDUĞUNDA olay yordamı içerisine
Kod:
Dim i as integer
i = Me.Açılan_Kutu1468.ListCount - 1
Me.Açılan_Kutu1468 = Me.Açılan_Kutu1468.ItemData(i)
YÖNTEM 2
Açılan_Kutu1468 adlı combobox’ın ÖZELLİKLER – VERİ – DENETİM KAYNAĞI satırına
Kod:
=[Açılan_Kutu1468].[Itemdata]([Açılan_Kutu1468].[ListCount]-1)