Yazdıklarınızdan anladığım kadarıyla,

"Gecikme hesapla" (Komut476) butonunun tıklandığında olayına aşağıdaki kodu ekle

If Me.Metin123 < Date And IsNull(Me.Metin281) Or Me.Metin281 = "" Then



Me.Metin427 = DateDiff("d", Me.Metin123, Date)

Me.Metin297 = (Me.Metin125 * 15 * Metin427) / 36000

End If



If Me.Metin123 < Date And Not IsNull(Me.Metin281) Then

Me.Metin293 = (Me.Metin125 - Me.Metin281)

End If

1. if 1 ve 3, 
2. if 2. maddedeki sorunun cevabıdır.

Tüm alanların hesaplanması için tek kod yazılabilirdi ancak metin kutusu isimleri karışık olduğu için döngü kuramıyorum.

Faiz olayındaki hesaplama hatalı olabilir.