スキルアップ・問題解決なら、モーグにおまかせ！

Sleep API関数を使って、指定時間だけ現在のスレッドの実行を中断することができます。タイマーイベントを使うより簡単です。


● 準備 ●
新規標準モジュールを用意し、以下の宣言文とSubプロシージャを記述します。


● サンプルプログラム ●
' スリープ関数(API)の宣言
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

' ５秒待ち関数
Public Sub Wait5second()
    Sleep 5000
    MsgBox "５秒経過しました"
End Sub


● 動作確認 ●
Wait5second」プロシージャを実行して下さい。
標準モジュールですので、「Wait5second」プロシージャ内にカーソルを置いて実行ボタンを押すか、[F5]キーを押します。
すると５秒後に、「５秒経過しました」とメッセージが表示されます。


● 詳細 ●
[Sleep API関数]
  引数：実行を中断する時間をミリ秒単位で指定します。
  戻り値：なし