掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
他のEXEから他のEXEを指定して終了するには？ (ID：109471)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
あまりスマートな方法ではありませんが、例えばこんな感じで。 Option Explicit Private Calc As Object Private Sub Command1_Click() Dim intProcessId As Integer Dim objSWbemObject As Object Dim strQuery As String With GetObject("winmgmts:") .Get("Win32_Process").Create "CALC.EXE", "C:\", Null, intProcessId strQuery = "SELECT * FROM Win32_Process WHERE ProcessId=" & CStr(intProcessId) For Each Calc In .ExecQuery(strQuery) Set objSWbemObject = Calc Exit For Next End With End Sub Private Sub Command2_Click() Calc.Terminate 0 End Sub
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.