2、寫入代碼
Dim nowtime As Integer
Public Sub Delay(t As Integer)
nowtime = Timer
Do While Timer - nowtime < t
DoEvents
Loop
End Sub
這樣一個延時函數(shù)就完成了!
工程中需要延時時只需調(diào)用該函數(shù)
例子:需要延時3秒
call delay(3)
即可!
首頁 → 編程開發(fā) → 其它知識 → VB中的延時函數(shù):自定義do...loop循環(huán)
相關(guān)軟件相關(guān)文章發(fā)表評論 來源:U盤殺毒精靈官網(wǎng)時間:2011/7/29 10:39:41字體大。A-A+
作者:反黑衛(wèi)士點擊:641次評論:1次標簽: VB6.0
名稱大小下載
聯(lián)系我們 | 發(fā)展歷程 | 版權(quán)聲明 | 下載幫助(?) | 廣告服務 | 軟件提交 | 網(wǎng)站地圖 | 意見反饋
聲明:西西軟件園為非贏利性網(wǎng)站 不接受任何贊助和廣告 鄂ICP備11008782號-1