החזרת יחיד המייצג את מספר השניות שעברו מאז חצות.
תחביר
שעון עצר
הערות
ב- Microsoft Windows , הפונקציה Timer מחזירה חלקים שברים של שנייה. ב- Macintosh, רזולוציית שעון העצר היא שניה אחת.
דוגמה לשאילתה
| ביטוי | תוצאות |
|---|---|
| SELECT Timer() AS SecondsPast FROM ProductSales GROUP BY Timer(); | הפונקציה מחזירה את מספר השניות שחלפו מאז חצות בהתבסס על זמן המערכת ומציגה בעמודה SecondsPast. |
דוגמה ל- VBA
הערה
הדוגמאות הבאות מדגימות את השימוש של פונקציה זו במודול Visual Basic for Applications (VBA). לקבלת מידע נוסף אודות עבודה עם VBA, בחר הפניית מפתח ברשימה הנפתחת שליד חיפוש והזן מונח אחד או יותר בתיבת החיפוש.
דוגמה זו משתמשת בפונקציה שעון עצר כדי להשהות את היישום. הדוגמה משתמשת גם ב- DoEvents כדי להיכנע לתהליכים אחרים במהלך ההשהיה.
Dim PauseTime, Start, Finish, TotalTime
If (MsgBox("Press Yes to pause for 5 seconds", _
4)) = vbYes Then
PauseTime = 5 ' Set duration.
Start = Timer ' Set start time.
Do While Timer < Start + PauseTime
DoEvents ' Yield to other processes.
Loop
Finish = Timer ' Set end time.
TotalTime = Finish - Start ' Calculate total time.
MsgBox "Paused for " & TotalTime & " seconds"
Else
End
End If