seferler Sorgu alt formu alt formunun geçerli olduğunda olayını aşağıaki gibi düzenleyip dener misiniz?

Private Sub Form_Current()

If IsNull(Me.tarih) Then Exit Sub

Me.kaldığı_gün = DMin("tarih", "seferler", "id=" & Me.id & " and clng(tarih)>" & CLng(Me.tarih)) - Me.tarih

End Sub