ส่งกลับ เดียว ที่แสดงจำนวนวินาทีที่ผ่านไปนับจากเที่ยงคืน
ไวยากรณ์
ตัวจับเวลา
ข้อสังเกต
ใน Microsoft Windows ฟังก์ชัน Timer จะส่งกลับส่วนที่เป็นเศษส่วนของวินาที บน Macintosh ความละเอียดของตัวจับเวลาคือหนึ่งวินาที
ตัวอย่างคิวรี
| นิพจน์ | ผลลัพธ์ |
|---|---|
| SELECT Timer() AS SecondsPast FROM ProductSales GROUP BY Timer(); | ส่งกลับจํานวนวินาทีที่ผ่านไปตั้งแต่เที่ยงคืนโดยยึดตามเวลาของระบบและแสดงในคอลัมน์ SecondsPast |
ตัวอย่าง VBA
หมายเหตุ
ตัวอย่างต่อไปนี้จะสาธิตการใช้ฟังก์ชันนี้ในโมดูล Visual Basic for Applications (VBA) สําหรับข้อมูลเพิ่มเติมเกี่ยวกับการทํางานกับ VBA ให้เลือก การอ้างอิงสําหรับนักพัฒนา ในรายการดรอปดาวน์ที่อยู่ถัดจาก ค้นหา แล้วใส่คําอย่างน้อยหนึ่งคําในกล่องค้นหา
ตัวอย่างนี้ใช้ฟังก์ชัน Timer เพื่อหยุดแอปพลิเคชันชั่วคราว ตัวอย่างยังใช้ 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