Question

vb中怎么使用api实现延时功能？

Answer 1

VB6.0可以使用Api函数Sleep来实现延迟功能。

1. Sleep函数，暂停当前线程指定的时间间隔执行。

   用法：

   Sleep （S）

   S，以毫秒为单位的睡眠时间
   

2. 通过VB自带的API浏览器，在模块中添加：
   

   Private Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)

3. 代码中用

   
   

       Sleep (1000) ‘延迟100毫秒执行按钮Click事件

       Private Sub Command1_Click()

4. 强烈建议使用Timer控件来实现延迟执行命令，它不会引起暂停等待，而不执行在延迟中发生的其它事件。

5. 使用 Timer 控件

   Timer
   控件响应时间的流逝。它们独立于用户，编程后可用来在一定的时间间隔执行操作。此控件的一个一般用处是检查系统时钟，判断是否该执行某项任务。对于其它后台处理，
   Timer 控件也非常有用。

Answer 2

PrivateDeclare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)