الخاصية "الفاصل_الزمني"

ينطبق على

يمكنك استخدام خاصية TimerInterval لتحديد الفاصل الزمني، بالمللي ثانية، بين أحداث عداد الوقت في نموذج. قراءة/كتابة طويل.

expression.TimerInterval

expression Required. هو تعبير يقوم بإرجاع أحد العناصر الموجودة في القائمة "ينطبق على".

ملاحظات

يكون إعداد خاصية TimerIntervalقيمة "عدد صحيح طويل" بين 0 و2147483647.

يمكنك تعيين هذه الخاصية باستخدام صفحة الخصائص الخاصة بالنموذج، أو الماكرو أو التعليمة البرمجية لـ Visual Basic for Applications (‏‎‎VBA‏‎‎).

لتشغيل التعليمات البرمجية لـ 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