让一个已经运行的程序暂停一段时间

smallrascal 2004-10-21 08:39:15

如何让一个已经运行的程序暂停一段时间，几秒就可以了！

...全文

225 14 打赏收藏转发到动态举报

写回复

用AI写文章

14 条回复

切换为时间正序

请发表友善的回复…

发表回复

smallrascal 2004-11-01

打赏
举报

有人知道吗？最好是具体代码，我有急用！
SetThreadPriority hThread, THREAD_PRIORITY_LOWEST
SetPriorityClass hProcess, IDLE_PRIORITY_CLASS
hThread和hProces怎么获得？是其他进程的，不是本进程的。

hglai 2004-10-24

打赏
举报

smallrascal 2004-10-24

打赏
举报

还有人知道吗？

smallrascal 2004-10-23

打赏
举报

那把对方的那个进程降低可以吗？还有就是调用什么VB API来实现？

smallrascal 2004-10-23

打赏
举报

TO LuBingLin(为什么？) ：
我是指别的程序，而不是自身。

limitworld 2004-10-23

打赏
举报

可以在一段时间内设置自身的进程高优先级来使的别的进程得不到ＣＰＵ处理时间而＇暂停＇
．

LuBingLin 2004-10-23

打赏
举报

Public Sub s_WaitTime(ByVal p_sngWaitTime As Single)
Dim sngBeforTime As Single

sngBeforTime = Timer()

'WAIT
Do Until Timer() - sngBeforTime > p_sngWaitTime
Loop
End Sub

aohan 2004-10-23

打赏
举报

关注

smallrascal 2004-10-22

打赏
举报

具体点，如何实现，用什么API，代码也可以。

zahota 2004-10-22

打赏
举报

wwqna 2004-10-22

打赏
举报

用钩子，在某个消息处，停几秒再吧再Call它本身函数。

smallrascal 2004-10-22

打赏
举报

不至于没人会吧，顶一下！

smallrascal 2004-10-21

打赏
举报

我不是说自身，而是其他的进程

tztz520 2004-10-21

打赏
举报

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

Private Sub Command2_Click()
Debug.Print Now
Sleep 3000'停止三秒
Debug.Print Now
End Sub