溫馨提示×

溫馨提示×

您好，登錄后才能下訂單哦！

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務(wù)條款》

sleep 是一個非常簡單的api語句,作用是"延時" DoEvents控件權(quán)移交給操作系統(tǒng)

發(fā)布時間：2020-06-28 10:50:06 來源：網(wǎng)絡(luò) 閱讀：956 作者：收銀軟件 欄目：開發(fā)技術(shù)

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

私有API函數(shù) 作用是延時，當(dāng)程序某段代碼循環(huán)運行的時候，為了更好的看到程序運行的效果

使用該函數(shù)

語法：Sleep 長整型數(shù)值

 

實現(xiàn)一個窗口左右抖動的效果

Private Sub CmdWindwos2_Click()
Dim i As Integer
Do While i <= 6
Me.Left = Me.Left - 300: Sleep 50: DoEvents    '實現(xiàn)窗口向左偏移300
Me.Left = Me.Left + 300: Sleep 50: DoEvents  '實現(xiàn)窗口向右偏移300
i = i + 1
Loop
End Sub

向AI問一下細(xì)節(jié)

免責(zé)聲明：本站發(fā)布的內(nèi)容（圖片、視頻和文字）以原創(chuàng)、轉(zhuǎn)載和分享為主，文章觀點不代表本網(wǎng)站立場，如果涉及侵權(quán)請聯(lián)系站長郵箱：is@yisu.com進(jìn)行舉報，并提供相關(guān)證據(jù)，一經(jīng)查實，將立刻刪除涉嫌侵權(quán)內(nèi)容。

AI
助
手