GetSystemTicks Function

অপারেটিং সিস্টেম দ্বারা সরবরাহকৃত সিস্টেম টিকের সংখ্যা প্রদান করে থাকে। একটি নির্দিষ্ট প্রক্রিয়া সেরা অনুকূল করার জন্য এই ফাংশনটি ব্যবহার করতে পারেন।

সিনট্যাক্স:

GetSystemTicks()

প্রদান মান:

লং

Error codes:

5 Invalid procedure call

উদাহরণ:

Sub ExampleWait

Dim lTick As Long

    lTick = GetSystemTicks()

    Wait 2000

    lTick = (GetSystemTicks() - lTick)

    MsgBox "" & lTick & " Ticks" ,0,"The pause lasted"

End Sub