HOME > 即効テクニック > AccessVBA > API > 指定時間だけ処理を中断する

即効テクニック

API

指定時間だけ処理を中断する

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


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


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

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


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


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