حدث عند عداد الوقت؟

يمكن ذلك عن طريق وضع شرط و نتيجة تترتب عن هذا الشرط, ينتج عنها عدم تكرار نفس الأمر.

هذا مثال عن ذلك

DoCmd.OpenReport "reportname", acViewPreview, WhereCondition:=" PrintYesNo = False "

هذا الأمر هو لطباعة التقرير reportname بشرط أن يكون حقل PrintYesNo = false

"DoCmd.RunSQL Update tbl1 set PrintYesNo = true where "PrintYesNo = false

هذا الأمر يقوم بتحديث الحقل PrintYesNo ليجعله = true

مما يترتب عنه أن التقرير لن يطبع مرة أخرى ما دام أن الحقل PrintYesNo قيمته هي true

أرجو أن أكون قد وفقت في الشرح, بطريقة تمكنك من الاٍستادة

ضع في حدث Form_Timer أول سطر هذا الكود :

Me.TimerInterval = 0

جزاكما الله خيرا أيها الكريمين

---

الأستاذ مهند عبادي أرجو فضلا لا أمرا أرجو أن تتكرم بالمرور على موضوعي السابق بخصوص تحديث القيم

على هذا الرابط