Mengembalikan Single yang mewakili angka detik yang berlalu sejak tengah malam.
Sintaks
Timer
Keterangan
Di Microsoft Windows fungsi timer mengembalikan pecahan porsi detik. Pada Macintosh, resolusi timer satu detik.
Contoh kueri
Ekspresi | Hasil |
|---|---|
|
Pilih timer () sebagai SecondsPast dari grup ProductSales dengan timer (); |
Mengembalikan jumlah detik yang berlalu sejak tengah malam berdasarkan waktu dan tampilan sistem di SecondsPast kolom. |
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 juga menggunakan Doevents untuk diyield ke proses lainnya 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
