VB2008グラフィック:他のアプリケーションを起動し、終了まで待つ(WaitForExit)

WaitForExitメソッドの実行例サンプルです

システム関連へ



終了まで待つには、WaitForExitメソッドを使います。
WaitForExitの引数に時間(ミリ秒)をを指定すると、時間分待機できます。

■実行画面
「メモ帳 終了まで」ボタンでは、メモ帳が閉じるまで待ちます。

「メモ帳 5秒」ボタンでは、メモ帳を起動し5秒間待機します。
EXEファイル起動フォーム

■実行コード

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim p As System.Diagnostics.Process = System.Diagnostics.Process.Start("Notepad")

'終了まで待つ
p.WaitForExit()

'終了処理
p.Close()
p.Dispose()

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim p As System.Diagnostics.Process = System.Diagnostics.Process.Start("Notepad")

'5秒間待つ
p.WaitForExit(5000)
Beep()

'終了処理
p.Close()
p.Dispose()

End Sub
End Class


Visual Basic 2008 Express Edition実践入門