如何正確理解VB.NET延時(shí)函數(shù)

第一個(gè)for完成對(duì)delay_time參數(shù)的控制，即共循環(huán)多少次內(nèi)部循環(huán)

成都創(chuàng)新互聯(lián)公司秉承實(shí)現(xiàn)全網(wǎng)價(jià)值營銷的理念，以專業(yè)定制企業(yè)官網(wǎng)，成都網(wǎng)站制作、成都網(wǎng)站設(shè)計(jì)、外貿(mào)營銷網(wǎng)站建設(shè)，成都微信小程序，網(wǎng)頁設(shè)計(jì)制作，成都手機(jī)網(wǎng)站制作，網(wǎng)絡(luò)營銷推廣幫助傳統(tǒng)企業(yè)實(shí)現(xiàn)“互聯(lián)網(wǎng)+”轉(zhuǎn)型升級(jí)專業(yè)定制企業(yè)官網(wǎng),公司注重人才、技術(shù)和管理，匯聚了一批優(yōu)秀的互聯(lián)網(wǎng)技術(shù)人才,對(duì)客戶都以感恩的心態(tài)奉獻(xiàn)自己的專業(yè)和所長。

第二個(gè)for（內(nèi)部循環(huán)），完成對(duì)j從0到199的控制，共循環(huán)200次。

翻譯成匯編就是：

(R0為傳遞參數(shù))

DELAY:

MOV R1,#200

DJNZ R1,$

DJNZ R0,DELAY

RET

VB.NET的幾種延時(shí)方法

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

Do

My.Application.DoEvents()

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

End Sub

vb.net,如下代碼，我想在MsgBox("A")和MsgBox("B")之間延時(shí)3秒(兩個(gè)msgbox要在同一個(gè)Sub）

Private Sub Button1_Click()

MsgBox("A")

Threading.Thread.Sleep(3000)

MsgBox("B")

End Sub

如果暫停的3秒有影響，就給他開一個(gè)線程：

Private Sub Button1_Click()

Dim th As New Threading.Thread(AddressOf MsgBoxProc)

th.Start()

End Sub

Private Sub MsgBoxProc()

MsgBox("A")

Threading.Thread.Sleep(3000)

MsgBox("B")

End Sub