فى النموذج يتم اضافة تاريخ الانتهاء تلقائيا مضاف اليه سنة . ولكن تم التعديل على حقل السنوات بحيث عند كتابة 0.3 مثلا يكتب ثلاثة أشهر فالمطلوب التعديل على السطر Me.end_date = DateAdd("YYYY", i + 1, firDat) - 1 الذى يضيف تاريخ الانتهاء فى Private Sub start_date_AfterUpdate() ليتم اضافى التاريخ حسب المدة بالضبط إن كان أشهر يكون تاريخ الانتهاء مطابق لعدد الأشهر وإن كان عام يطابق العام وهكذا
ضبط_التاريخ.accdb