VB下的几个延时程序
来源:互联网 发布:詹姆斯科比季后赛数据 编辑:程序博客网 时间:2024/06/03 17:34
最近写个东西用到延时函数,整理一下:
代码1Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)代码2Private Declare Function timeGetTime Lib "winmm.dll" () As LongFunction Delaytime(Milliseconds As Integer) Dim Savetime As Double Savetime = timeGetTime '记下开始时的时间 While timeGetTime < Savetime + Milliseconds '循环等待 DoEvents '转让控制权,以便让操作系统处理其它的事件。 WendEnd Function代码3Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)Private Declare Function timeGetTime Lib "winmm.dll" () As LongFunction Delaytime(Milliseconds As Integer) '改造后的延时程序 Dim Savetime As Double Savetime = timeGetTime '记下开始时的时间 While timeGetTime < Savetime + Milliseconds '循环等待 Sleep (30) '加上这么一句后,该函数延时不占用CPU资源,也不像sleep函数,调用后程序无反应了。 DoEvents '转让控制权,以便让操作系统处理其它的事件。 WendEnd Function以上三个代码都能延时,代码一的缺点是延时长点后,在延时过程中程序无反应了;代码二的缺点是延时的时候程序有反应,延时过程中CPU接近100%,代码三是结合前两个代码,延时过程中程序也有反应,CPU占用也小。
- VB下的几个延时程序
- 延时的几个方式
- VB.NET中串口通讯延时程序
- android下的几个程序
- VB 延时
- vb延时
- VB下的CRC校验程序
- VB实现不占用CPU的延时
- VB实现不占用CPU的延时
- VB 里常用的延时方法
- VB.NET的几种延时方法
- vb延时的几种方法
- STM32在系统时钟为72M下的几个延时函数—V3.5库
- 批处理延时启动的几个方法
- cmd批处理延时启动的几个方法
- 写几个简单的延时函数
- 批处理延时启动的几个方法
- 最简单的延时程序
- http://www.wobusb.cn/Article/List/List_151.html
- 用Quartz 进行作业调度
- ajax拖拽布局
- kmp算法的c代码实现
- Oracle 10g 10.1.0.3 全程安装配置图解!(三)
- VB下的几个延时程序
- 内存溢出 ava.lang.OutOfMemoryError: Java heap space
- 傻瓜福州话
- 把Excel表中的数据导入sql数据库
- c语言符号"->"
- one:
- 傻瓜福州话
- 两篇英文文章
- Gridview导出Excel时出错解决