Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Using p As Process = Process.Start("inetcpl.cpl") p.WaitForExit() MsgBox("終了しました") End Using End Sub