电脑爱好者,提供IT资讯信息及各类编程知识文章介绍,欢迎大家来本站学习电脑知识。 最近更新 | 联系我们 RSS订阅本站最新文章
电脑爱好者
站内搜索: 
当前位置:首页>> VB编程>>VB中使用延时函数(Sleep):

VB中使用延时函数(Sleep)

来源:www.cncfan.com | 2006-12-12 | (有32433人读过)

  '声明:  
  Declare   Sub   Sleep   Lib   "kernel32"   (ByVal   dwMilliseconds   As   Long)  
  '调用:  
  '延时1秒  
  Call   Sleep(1000)  

以下是引用片段:

sleep   是个好办法,但是进程会暂停   
    
  附送一个延时函数:(体现DoEvents   的用处)  
   
  Public   Sub   Delay(mSec   As   Long)  
  On   Error   Resume   Next  
           
          Dim   TStart   As   Single  
           
          TStart   =   Timer  
           
          While   (Timer   -   TStart)   <   (mSec   /   1000)  
                  DoEvents  
          Wend  
   
   
  End   Sub   
 
VB编程热门文章排行
网站赞助商
购买此位置

 

关于我们 | 网站地图 | 文档一览 | 友情链接| 联系我们

Copyright © 2003-2022 电脑爱好者 版权所有 备案号:鲁ICP备09059398号