GetSystemTicks Function
བཀོལ་སྤྱོད་མ་ལག་གིས་མཁོ་འདོན་བྱས་པའི་མ་ལག་བྱ་འགུལ་གྱི་ཡི་གེའི་ཁ་གྲངས་སུ་ཕྱིར་ལོག་པ། རྟེན་གྲངས་འདི་ཉིད་འཕལ་རིམ་འགའ་ལེགས་འགྱུར་བྱས་པར་སྤྱོད་ཆོག
བརྡ་འཕྲོད་
GetSystemTicks()
ཕྱིར་ལོག་ཐང་
ཧྲིལ་གྲངས་རིང་པོ་
དཔེ་གཞི་
Sub ExampleWait
Dim lTick As Long
lTick = GetSystemTicks()
Wait 2000
lTick = (GetSystemTicks() - lTick)
MsgBox "" & lTick & " Ticks" ,0,"The pause lasted"
End Sub