３．ＶＢアプリケーションからＷＩＮＤＯＷＳ（ＯＳ）を終了させる方法
＜ 使用用途 ＞
ＶＢアプリケーションからＷＩＮＤＯＷＳを終了させたり、再起動したり出来ます。
今回のサンプルソースをダウンロードする方は下記の「ダウンロード」を！
＝＞ ダウンロード・・・ 下に書いてあるサンプルソースと同じです
＜ 説明 ＞
ＡＰＩ関数のExitWindowsExを使用します。
サンプルではｗｉｎｄｏｗｓの終了処理を書いてます。
|
|
|
|
| EXIT_PROCESS |
|
応答のないﾌﾟﾛｾｽを強制終了する |
| EXIT_LOGOFF |
|
現在のﾕｰｻﾞｰのｱﾌﾟﾘｹｰｼｮﾝをｸﾛｰｽﾞし、ﾛｸﾞｵﾌする |
| EXIT_SAIKIDOU |
|
ｼｽﾃﾑをｼｬｯﾄﾀﾞｳﾝ後、再起動 |
| EXIT_SHUTDOWN |
|
ｼｽﾃﾑをｼｬｯﾄﾀﾞｳﾝ後、電源ｵﾌ可能状態にする |
＠戻り値＠
正常終了のとき ： 0 以外
エラーのとき ： 0
＜ ＳＡＭＰＬＥ ＞
'標準モジュールに宣言してください
Declare Function ExitWindowsEx Lib "USER32" _
(ByVal uFlags As Long, ByVal dwReserved As Long) As Long
Public Const EXIT_SHUTDOWN = 1
Public Const EXIT_PROCESS = 4
Public Const EXIT_LOGOFF = 0
Public Const EXIT_SAIKIDOU = 2
'ここから下はフォームのエリアです
’サンプルではフォームにあるコマンドボタンを押した時の処理です
Private Sub Command1_Click()
ExitWindowsEx EXIT_LOGOFF, 0
End Sub