Eğer formunuzun form current (Geçerli olduğunda) olayına aşağıdaki kodları yapıştırırsanız istediğiniz şey gerçekleşir. Yalnız liste6 nın da güncellenmesi için biraz daha uğraşmalısınız. Ama form kapanıp açıldığında o da doğru gösterecektir. Kodlar aşağıda:
Kod:
Dim a As Date
a = Date + 1
If Me.cikistarihi = a Then Me.odanumarasi = ""
Kod:
me.liste6.requery
Bu komut tek başına yeterli olmayacak ve liste6 hemen doğru çalışmayacaktır. Bunun için kayıt kaynağıyla ilgili başka yöntemler kullanmalı veya kayıt güncelleme yapmalısınız. Alt form kullanarak da problemi çözebilirsiniz.