Timer Interval & On Timer Event استخدام الفاصل الزمني ( فترة التوقيت) في حدث عند المؤقت في اكسس

 استخدام الفاصل الزمني (فترة التوقيت) Timer Interval في حدث عند المؤقت On Timer  في اكسس 

لتنفيذ كود معين بشكل متكرر في كل فترة يتم استخدام هذا الحدث On Timer وهنا يجب تحديد طول الفترة (عدد الثواني) التي عندها سيتم تنفيذ الكود مرة اخرى، مثلا بعد ان يتم تحديث حقل الساعة والتاريخ في كل 5 ثواني.

وهنا يجب ان يتم تحديد الفترة الزمنية او الفاصل الزمني (Timer Interval) والذي يعبر عنه باجزاء الثواني وهو قيمة محصورة بين 0 جزء من الثانية ولغاية 2,147,483,647 جزء من الثانية.

والامثلة كثيرة على استخدام الحدث (On Timer) فمثلا لو اردنا انشاء ساعة في احد النماذج فاننا سنضطر الى تغيير قيمة حقل الساعة بشكل مستمر حتى يظهر لدينا الوقت بشكل محدث، و على سبيل المثال لو اردنا جعل لون الخلفية لتسمية معينة في النموذج يظهر بشكل وميض او مومض سنقوم باخفاء هذة التسمية واعادة اظهارها في كل ربع ثانية او بتغيير اللون من لون الى اخرفي كل نصف ثانية مثلا.

مثال على جعل تسمية (Label1) تظهر وتختفي كل نصف ثانية

نقوم باضافة تسمية ونسميها (Label1) في نموذج جديد ونكتب فيها ما نريد ثم  نقوم بتغيير (Timer Interval) الى 500  ثم نقوم بوضع الكود التالي في حدث (On Timer) 

VBA

Private Sub Form_Timer()
If Label1.Visible = True Then
    Label1.Visible = False
Else
    Label1.Visible = True
End If
End Sub

كما ويمكن تغيير قيمة الفاصل الزمني (Timer Interval) باستخدام كود (VBA)

VBA

Me.TimerInterval = 500