vb点虐延时执行的简单介绍

vb。net 缓两秒执行一段程序

可以利用Timer时钟控件实现，这样做的好处是无需等待，释放CPU时间去做别的事

创新互联公司2013年至今，是专业互联网技术服务公司，拥有项目成都网站设计、成都网站建设网站策划，项目实施与项目整合能力。我们以让每一个梦想脱颖而出为使命，1280元简阳做网站,已为上家服务,为简阳各地企业和个人服务,联系电话:18980820575

第一个for完成对delay_time参数的控制，即共循环多少次内部循环

第二个for（内部循环），完成对j从0到199的控制，共循环200次。

翻译成汇编就是：

(R0为传递参数)

DELAY:

MOV R1,#200

DJNZ R1,$

DJNZ R0,DELAY

RET

Imports System.Threading

Thread.Sleep(1000)’延迟1秒

2.PauseWait(1000)’延迟1秒

Public Sub PauseWait(ByVal HowLong As Long)

Dim tick As Long

tick = My.Computer.Clock.TickCount

My.Application.DoEvents()

Loop Until tick + HowLong My.Computer.Clock.TickCount

End Sub

Threading.Thread.Sleep(500)这句是线程停止等待的，在这500毫秒的时间里你的任何动作都是不响应的，理论上再SendKeys.Send(TextBox2.Text)这段时间内你可以动作，但是send是毫秒级完成的，你还没有来得及响应就进入了下一次的循环，所以跟卡死类似

解决方法：通过timer定时器延时

分享标题：vb点虐延时执行的简单介绍
地址分享：http://scyanting.com/article/ddgdede.html