溫馨提示×
您好，登錄后才能下訂單哦！
點擊 登錄注冊 即表示同意《億速云用戶服務條款》
您好，登錄后才能下訂單哦！
public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
私有API函數 作用是延時，當程序某段代碼循環運行的時候，為了更好的看到程序運行的效果
使用該函數
語法：Sleep 長整型數值
實現一個窗口左右抖動的效果
Private Sub CmdWindwos2_Click()
Dim i As Integer
Do While i <= 6
Me.Left = Me.Left - 300: Sleep 50: DoEvents '實現窗口向左偏移300
Me.Left = Me.Left + 300: Sleep 50: DoEvents '實現窗口向右偏移300
i = i + 1
Loop
End Sub
免責聲明：本站發布的內容（圖片、視頻和文字）以原創、轉載和分享為主，文章觀點不代表本網站立場，如果涉及侵權請聯系站長郵箱：is@yisu.com進行舉報，并提供相關證據，一經查實，將立刻刪除涉嫌侵權內容。
