Question

求VB延时函数

如需API请把声明写下

Answer 1

自己写个也行 Public Sub delay(ByRef Interval As Double)
'比如延时5秒就delay(5)
Dim time As DateTime = DateTime.Now
Dim Span As Double = Interval * 10000000 '因为时间是以100纳秒为单位。
While ((DateTime.Now.Ticks - time.Ticks) < Span)
Application.DoEvents()
End While
End Sub

Answer 2

很明确,没有这个API如果需要,可以使用SLEEP,但是效果不好,窗体会没响应的

Answer 3

用timer就可以了