Timer 函數

會傳回 Single,代表午夜之後經歷的秒數。

語法

Timer

註解

在 Microsoft Windows 中, Timer函數會傳回秒的小數部分。 在 Macintosh 上,計時器解析度為1秒。

查詢範例

運算式

結果

選取 [計時器] ()作為 SecondsPast 從 ProductSales [群組依據] 計時器();

傳回根據系統時間,並顯示在 [欄 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

附註:  本頁面是經由自動翻譯而成,因此文中可能有文法錯誤或不準確之處。 讓這些內容對您有所幫助是我們的目的。 告訴我們這項資訊是否有幫助? 這裡是供您參考的英文文章

請參閱

選擇正確的日期函數

增進您的 Office 技巧
探索訓練
優先取得新功能
加入 Office 測試人員

這項資訊有幫助嗎?

感謝您的意見反應!

感謝您的意見反應! 我們將協助您與我們的其中一個 Office 支援專員連絡以深入了解您的意見。

×