IBM Lotus Symphony


‏‎GetSystemTicks Function [Runtime]‎‏

يتم ارجاع عدد علامات النظام system ticks المتاحة بواسطة نظام التشغيل. يمكنك استخدام هذه الوظيفة لتنفيذ عملية معينة بطريقة مثلى.

الصيغة:

GetSystemTicks()

القيمة المرتجعة:

طويل

أكواد الخطأ

5 استدعاء غير صحيح للاجراء

مثال:

Sub ExampleWait

Dim lTick As Long

lTick = GetSystemTicks()

wait 2000

lTick = (GetSystemTicks() - lTick)

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

End Sub


التعليق التقييمي عن البرنامج | المزيد من المطبوعات الفنية | العلامات التجارية