تصميم Access لقياس سرعة فتح التقارير

admin

عضو إداري
ادارة المنتدى



السلام عليكم ورحمة الله وبركاته
=================
لقياس سرعة فتح التقارير ضع الكود التالي في حدث عند الفتح للتقرير

ويجب عليك تغيير اسم التقرير بدلا من YourReportName​


كود:
dim dtStart as date 

dim dtStop as date 


dtStart = Now() 

docmd.openreport "YourReportName" 

dtStop = Now() 


msgbox "Time to open: " & dtStop-dtStart
 

ابن الوليد

مشرف برامج مايكروسوفت
طاقم الاشراف

تسلم يمينك ويسلم مجهودك الممتاز
واصل يالغالى
لك منى اجمل تحية :7:
 

أعلى