发信人: kvdvm()
整理人: cobe(2000-06-23 22:44:26), 站内信件
|
【 在 cheng_bo (波仔) 的大作中提到: 】
: 如何在VB中调用55ms(18.2次)的时钟中断
: 本人想用timer实现定时，但太不准确
在WINDOWS中，普通的程序就没法定时中断，但知道了以下两点，我想对你应该有
所帮助：
1、API: timeSetEvent可更精确一点。
2、大多数情况下，知道两次中断之间的准确时间就可以了（或许连“准确”都不
用），这时你可用GetTickCount之类的API。
关于第二点可以举个例：比如在一个工业测量系统中用普通定时器作流速采样，
并要求计量总流量，可以这样写：
Private Sub Timer1_Timer()
dim lTmp as long
lTmp=GetTimeCount
fSpeed = IOGetSpeed(dSensorID)
fTotal = fTotal + fSpeed * (lTmp - lPreCount) * fK
lPreCount = lTmp
End Sub
其精度完全可满足大多数要求。
--
[email protected]
※ 来源:．月光软件站 http://www.moon-soft.com．[FROM: 202.115.160.25]
|
|