Question

我想用VB写个延时5分钟的程序 .

Answer 1

有两种方案：
1是用timer控件设置定时器，但是不能直接定成5分钟。可以定成1分钟内，然后计数到5分钟。
2是使用API函数sleep（微秒数）实现。

Answer 2

Public Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)
你可以用这个函数
比如你想延迟一秒再执行后面的代码——sleep 1000 '就是这样不知道是不是你想要的

追问

程序运行要延时5分钟,很占CPU的,CPU占用百分之50啊

Answer 3

Private Sub Command1_Click()
Timer1.Interval = 1000
End Sub

Private Sub Timer1_Timer()
Static i As Integer
i = i + 1
If i = 300 Then
执行的代码

i = 0
End If
End Sub