ينطبق على
عنصر Form |
يمكنك استخدام خاصية TimerInterval لتحديد الفاصل الزمني، بالمللي ثانية، بين أحداث عداد الوقت في نموذج. قراءة/كتابة طويل.
expression.TimerInterval
expression Required. هو تعبير يقوم بإرجاع أحد العناصر الموجودة في القائمة "ينطبق على".
ملاحظات
يكون إعداد خاصية TimerIntervalقيمة "عدد صحيح طويل" بين 0 و2147483647.
يمكنك تعيين هذه الخاصية باستخدام صفحة الخصائص الخاصة بالنموذج، أو الماكرو أو التعليمة البرمجية لـ Visual Basic for Applications (VBA).
ملاحظة: عند استخدام VBA، يمكنك تعيين خاصية TimerInterval في حدث Load الخاص بالنموذج.
لتشغيل التعليمات البرمجية لـ VBA في فواصل زمنية محددة بواسطة خاصية TimerInterval، ضع التعليمة البرمجية في إجراء حدث Timer الخاص بالنموذج. على سبيل المثال، لإعادة طلب السجلات كل 30 ثانية، ضع التعليمة البرمجية لإعادة طلب السجلات الموجودة في إجراء حدث Timer الخاص بالنموذج، ثم قم بتعيين خاصية TimerInterval إلى 30000.
مثال
يوضح المثال التالي كيفية إنشاء زر وامض في نموذج بعرض أيقونة وإخفائها على الزر. يقوم إجراء حدث Load للنموذج بتعيين خاصية TimerInterval في النموذج إلى 1000 بحيث يتم تبديل عرض الأيقونة مرة واحدة كل ثانية.
Sub Form_Load()
Me.TimerInterval = 1000
End Sub
Sub Form_Timer()
Static intShowPicture As Integer
If intShowPicture Then
' Show icon.
Me!btnPicture.Picture = "C:\Icons\Flash.ico"
Else
' Don't show icon.
Me!btnPicture.Picture = ""
End If
intShowPicture = Not intShowPicture
End Sub