vb,怎样延迟执行下一段代码

（1）可以用api ，如以下程序：

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

Private Sub Command1_Click()

MeCaption ="Your system will sleep 5 sec"

Sleep 5000 'Sleep for 5000 milliseconds

MeCaption = ""

End Sub

（2）,也可以不用api，自己可以定义一个延时函数，调用它即可：

Private Sub Delay(HowLong As Date)

TempTime = DateAdd("s", HowLong, Now)

While TempTime > Now

DoEvents '让 windows 去处理其他事

Wend

End Sub

比如要某条语句后要延迟五秒，即加上语句：

Delay 5

毫秒级别的延时代码,我昨天在写一个秒表,发现VB自带的timer不准,所以找到了下面这个API函数,改了一下,给你一个延时代码从百度贴吧找到的,并非原创

Private Declare Function GetTickCount& Lib "kernel32" () '声明API

Private Function yanshi(ms As Long) '我自创一个延时函数名为"yanshi"

starttim = GetTickCount

Do

DoEvents

Loop Until GetTickCount >= starttim + ms

End Function

打开VB,把上面的代码复制到通用处,当你想用到延时的时候,添加一句:

yanshi "引号里输入毫秒数"

就可以在两句代码之间延时一段时间执行了

以上就是关于vb,怎样延迟执行下一段代码全部的内容，包括:vb,怎样延迟执行下一段代码、vb如何写延时程序 ms的、等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！