Windowsを終了・再起動する方法

◆概要

このページは、Visual Basic 6.0でWindowsを終了・再起動する方法について記載しています。


◆内容

APIのExitWindowsEx を使うと、Windowsを終了させたり、再起動させたりすることができます。

書式
ExcitWindowsEx uFlags,dwReserved

uFlagsのパラメータを変えることにより、シャットダウンなどができます。

  • EWX_FORCE 　　　　応答しないプロセスを強制終了する。
  • EWX_LOGOFF 　　　プロセスを終了した後、ログオフする。
  • EWX_POWEROFF 　可能であれば、システムの電源を切る。
  • EWX_REBOOT 　　　システムを再起動する。
  • EWX_SHUTDOWN 　システムをシャットダウンする。

注１：OR演算子で組み合わせることが可能。
注２：dwReservedは予約済みなので、常に０に設定しておく。

次の例は、コマンドボタンを押すとシステムが再起動します。

標準モジュール

Option Explicit

Declare Function ExitWindowsEx Lib "user32" _
    (ByVal uFlags As Long, ByVal dwReserved As Long)

Public Const EWX_SHUTDOWN = 1
Public Const EWX_FORCE = 4
Public Const EWX_LOGOFF = 0
Public Const EWX_REBOOT = 2
フォームモジュール

Private Sub Command1_Click()
    ExitWindowsEx EWX_REBOOT, 0 'システムを再起動する
End Sub


▼ページトップへ