首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

VB如何做延时效果

2012-01-16 
VB怎么做延时效果我在程序中遇到一个问题,我代码中需要用到延时我开始用Sleep做延时,但是发现在用Sleep时

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函数,请自己查阅定义。

热点排行