המאפיין TimerInterval

חל על

באפשרותך להשתמש במאפיין TimerInterval כדי לציין את מרווח הזמן, באלפיות השניה, בין אירועי שעון עצר בטופס. קריאה/כתיבה Long.

ביטוי.TimerInterval

ביטוי נדרש. ביטוי שמחזיר אחד מהאובייקטים ברשימה חל על.

הערות

הגדרת המאפיין TimerInterval היא ערך מספר שלם ארוך בין 0 לבין 2,147,483,647.

באפשרותך להגדיר מאפיין זה על-ידי שימוש ב- גליון מאפיינים של הטופס, מאקרו, או בקוד Visual Basic for Applications‏ (VBA).

כדי להפעיל קוד VBA במרווחי הזמן שצוינו על-ידי המאפיין TimerInterval, הצב את הקוד בפרוצדורת האירוע שעון עצר של הטופס. לדוגמה, כדי להפעיל מחדש שאילתות ברשומות כל 30 שניות, הצב את הקוד כדי להפעיל מחדש את השאילתה ברשומות בפרוצדורת האירוע שעון עצר של הטופס, ולאחר מכן הגדר את המאפיין TimerInterval ל- 30000.

דוגמה

הדוגמה הבאה מראה כיצד ליצור לחצן מהבהב על בטופס על-ידי הצגה והסתרה של סמל בלחצן. פרוצדורת האירוע טעינה של הטופס מגדירה את המאפיין 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