有什么方法可以使程序延迟执行!清告诉我谢谢!!!!

loveyxy 2001-11-09 12:03:04
...全文
63 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
foolishtiger 2001-11-09
  • 打赏
  • 举报
回复
Option Explicit
' Purpose:
' Author:吴文智
' Date:2001-11-09
'Description:要试用本例请在窗体中填加一个按钮
' 然后在代码窗体中粘贴如下代码
' Good luck!

Private Sub Command1_Click()
Dim PauseTime, Start, Finish, TotalTime
MsgBox "按确定后程序延迟3秒", vbInformation
Start = Timer ' 设置开始暂停的时刻。
Do While Timer < Start + 3 '对时间进行比较
DoEvents
Loop
MsgBox "延迟结束", vbInformation
End Sub

redkit 2001-11-09
  • 打赏
  • 举报
回复
用sleep的api
cqq_chen 2001-11-09
  • 打赏
  • 举报
回复
用FOR写一个空的不行吗?
loveyxy 2001-11-09
  • 打赏
  • 举报
回复
在.dll中可以么?
smartgkk 2001-11-09
  • 打赏
  • 举报
回复
使用TIME控件加以控制。。。

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧