taskkill /f /im chrome.exe
taskkill /pid [PID1] /pid [PID2] /pid [PID3] ... /t /f
wmic process where (processid=[調査対象PID]) get parentprocessid
wmic process where "name = 'chrome.exe'" delete
Dim Shell, WMI, query, process Set Shell = CreateObject("WScript.Shell") Set WMI = GetObject("winmgmts:{impersonationLevel=Impersonate}!\\.\root\cimv2") query = "SELECT ProcessId FROM Win32_Process WHERE Name = 'chrome.exe'" For Each process In WMI.ExecQuery(query) On Error Resume Next process.Terminate Next