Mengembalikan Single yang mewakili angka detik yang berlalu sejak tengah malam.
Sintaks
Timer
Keterangan
Di Microsoft Windows, fungsi Timer mengembalikan bagian pecahan kedua. Di Macintosh, resolusi timer adalah satu detik.
Contoh kueri
Ekspresi |
Hasil |
SELECT Timer() AS SecondsPast FROM ProductSales GROUP BY Timer(); |
Mengembalikan jumlah detik yang berlalu sejak tengah malam berdasarkan waktu sistem dan ditampilkan dalam kolom SecondsPast. |
Contoh VBA
Catatan: Contoh yang mengikuti demonstrasi penggunaan fungsi ini dalam modul Visual Basic for Applications (VBA). Untuk informasi selengkapnya tentang bekerja dengan VBA, pilih Referensi Pengembang di daftar turun bawah di samping Cari dan masukkan satu istilah atau lebih di kotak pencarian.
Contoh ini menggunakan fungsi Timer untuk menjeda aplikasi. Contoh ini juga menggunakan DoEvents untuk menghasilkan proses lain selama jeda.
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