المشكلة تكمن في الحلقة For i = 1 To .RecordCount الخاصة بتحميل النموذج
من المفترض ان RecordCount تكون مساوية لعدد السجلات و لتكن فرضا 600 سجل
ولكن عندما تصل قيمة i الى 500 يتم الخروج من الحلقة
حاولت تغيير نوع i من integr الى long
ولكن بدون فائدة
علما انه عند اغلاق النموذج تستمر الحلقة الى قيمة i الكاملة ( 600 )
ماهو السبب ؟؟؟؟