VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [過去ログ] [管理用]

投稿日: 2003/12/26(Fri) 13:45
投稿者花ちゃん
Eメール
URL
タイトルRe^5: アプリケーションの終了

>   TerminateProcessを使用すると殺せません
>        Dim handle_id  As Long
>        handle_id = FindWindow(vbNullString, キャプション名)
>        Call TerminateProcess(handle_id, 0&)
>        Call CloseHandle(handle_id)

下記ではどうですか?

        'クラス名より、ウィンドウのハンドルを取得(電卓の場合)
        hWindow = FindWindowEx(0, 0, "SciCalc", vbNullString)
        'プロセスIDを取得
        Call GetWindowThreadProcessId(hWindow, ProcessID)
        'プロセスオブジェクトのハンドルを取得
        hProcess = OpenProcess(PROCESS_ALL_ACCESS, True, ProcessID)
        'プロセスを強制終了する
        Call TerminateProcess(hProcess, 0&)
        'オブジェクトのハンドルを開放
        Call CloseHandle(hProcess)

URLのサンプルではコールバック関数を使用していますが、別に使用せずとも同様に一覧を取得
出来ますよ。


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- Web Forum -