החזרת יחיד המייצג את מספר השניות שעברו מאז חצות.
תחביר
שעון עצר
הערות
ב- Microsoft Windows , הפונקציה Timer מחזירה חלקים שברים של שנייה. ב- Macintosh, רזולוציית שעון העצר היא שניה אחת.
דוגמה לשאילתה
|
Expression |
תוצאות |
|
SELECT Timer() AS SecondsPast FROM ProductSales GROUP BY Timer(); |
הפונקציה מחזירה את מספר השניות שחלפו מאז חצות בהתבסס על זמן המערכת ומציגה בעמודה SecondsPast. |
דוגמה ל- VBA
הערה: הדוגמאות הבאות מדגימות את השימוש של פונקציה זו במודול Visual Basic for Applications (VBA). לקבלת מידע נוסף אודות עבודה עם VBA, בחר הפניית מפתח ברשימה הנפתחת שליד חיפוש והזן מונח אחד או יותר בתיבת החיפוש.
דוגמה זו משתמשת בפונקציה שעון עצר כדי להשהות את היישום. הדוגמה משתמשת גם ב- DoEvents כדי להיכנע לתהליכים אחרים במהלך ההשהיה.
Dim PauseTime, Start, Finish, TotalTimeIf (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 EndEnd If
