Fungsi GetSystemTicks

Mengembalikan jumlah tanda sistem yang disediakan oleh sistem operasi. Anda dapat menggunakan fungsi ini untuk mengoptimalkan proses tertentu.

Sintaksis:


GetSystemTicks()

Nilai hasil:

Long

Kode kesalahan:

5 Tidak sah dalam pemanggilan prosedur

Contoh:


Sub ExampleWait
Dim lTick As Long
    lTick = GetSystemTicks()
    Wait 2000
    lTick = (GetSystemTicks() - lTick)
    Kotak Peasan"" & Baik & " Kuut" ,0,"Jeda Berlangsung"
End Sub

Mohon dukung kami!