VB怎么做延时效果
我在程序中遇到一个问题,我代码中需要用到延时
我开始用Sleep做延时,但是发现在用Sleep时 程序会在Sleep的时间段没响应
用Timer控件 的话 误差太大了 不同的计算机 CPU 时钟频率不同 速度不同 延时效果也不同
有没有什么好的 方法 做这个延时效果
假设我给某个变量赋值后,要延时 600毫秒 再重新给它赋值,示例代码如下:
dim x as long
x=320
'延时600毫秒
x=800
有没有什么好的方法 延时的时候 程序不会无响应,且误差不要太大
在线等~ 急~~~~~
[解决办法]
VB中延时也就那么几个方法。
Timer
Sleep
Do...Loop循环
但是如果加上鸡肋的多线程就是比较好的延时了。。。但是VB多线程是鸡肋
[解决办法]
dim lngP as long
lngP=gettickcount
do
DoEvents
loop until gettickcount-lngP>1000
上面的代码实现了延迟1000ms,并且不会使程序阻塞。GetTickCount是API函数,请自己查阅定义。