LibreOfficeDev 25.8 Help
운영 체제가 제공하는 시스템 틱 수를 구합니다. 이 함수를 사용하여 특정 프로세스를 최적화할 수 있습니다.
GetSystemTicks()
Long
Sub ExampleWait
Dim lTick As Long
lTick = GetSystemTicks()
Wait 2000
lTick = (GetSystemTicks() - lTick)
MsgBox "" & lTick & " Ticks" ,0,"The pause lasted"
End Sub