即効テクニック |
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関数] 引数:実行を中断する時間をミリ秒単位で指定します。 戻り値:なし