编程论坛 → VB6论坛

新手疑问求解答

libingchao 发布于 2020-11-05 20:49， 2688 次点击

[图片]
我编写了这样一段计时器程序。
在运行过程中发现这段程序砸死winxp和win10下运行正常。但是在win7系统下，计时器与秒表掐的时间有差距，而且是时间越长，累计的差距越大。想请问高手是不是系统设置问题，该如何设置。

7 回复

yuma2020-11-05 21:42

发一下你的代码，大家看一下才知道原因。

libingchao2020-11-06 11:41

图片没发上去啊。。。。
代码是这样:
dim time as single

private sub command1_click()
timer1.enableed=true
time=0
end sub

private sub timer1_timer()
time=time+1
label1.caption=time\2
if csng(label1.caption)=csng(text1.text) then
timer1.enabled=false
end if
end sub

libingchao2020-11-06 11:43

回复 2楼 yuma

dim time as single

private sub command1_click()
timer1.enableed=true
time=0
end sub

private sub timer1_timer()
time=time+1
label1.caption=time\2
if csng(label1.caption)=csng(text1.text) then
timer1.enabled=false
end if
end sub
代码是这样同样的代码分别在xp win7 win10运行 win7的计时会出问题
大神帮我看看把

cwa99582020-11-06 15:08

timer控件做定时，是不准的。
还有time是一个系统函数，不要做变量。

libingchao2020-11-06 21:28

回复 5楼 cwa9958

请问大神有没有什么很准的做定时器的方法？

cwa99582020-11-07 08:54

一般时间都是取用电脑的系统时间。
timer函数是获得从0点开始到现在的时间，精确到0.001秒。但是有一个缺点，过了0点就会重新计算，只能短时间使用。
电脑的开机时间，只能精确到秒。

[此贴子已经被作者于2020-11-7 08:56编辑过]

wufuzhang2020-11-09 09:24

mmTimer.dll
毫秒级定时器，精度很高。

只有本站会员才能查看附件，请登录