lütfen çalışmanızı
1 - gizleme kodları olmadan
2 - formların kalıcı özelliğini hayır
3 - form menüleri pasif olmadan yükleyin ki bizler de bunları değiştirmekle zaman kaybetmeyelim

x = DCount("*", "teslimedilmeyenler", "uyeadi='" & Me.Metin103 & "'")

If x > 0 Then MsgBox "bu üye " & x & " kitabı teslim etmedi"

kodlarını deneyebilirsiniz?
metin103 değiştiğinde yada güncellendiğinde olaylarından birine ekleyebilirsiniz