作者SmallBeeWayn (喵喵叫的蜜蜂猫)
看板Visual_Basic
标题Re: [VB6 ] 怎麽让程式执行时间低於1ms
时间Thu Dec 21 12:47:55 2006
※ 引述《GetWorld (得到世界)》之铭言:
: 请问各位大大
: 如何将程式每次执行时间缩短在1ms以内..
: API我有用过timeGetTime....不过写不太出来= =
: 请问各位高手~该怎麽让程式可以在1ms时间就执行一次><
: 我是新手~谢谢各位
如果你要精度高到1ms一次
就不需要用计时器了
请直接写成这样
Dim TimeLast As Long
Do
Do Until Not TimeLast = timeGetTime
Loop
TimeLast = timeGetTime
程式区段
Loop Until 程式结束条件达成
连DoEvents都不需要,因为这样的控制密度根本不允许做其他事情了
如果你需要详细计算每次执行经过的时间
请用QueryPerformanceFrequencey 跟 QueryPerformanceCounter
来计算时间差
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.115.204.46
1F:推 GetWorld:谢谢回答~~我在试试看^^ 12/21 14:04