VB结束指定名称的所有活动进程，VB结束指定的所有活动进程，VB结束指定名称的活动进程，VB结束指定名称活动进程，VB结束指定名称的进程，VB结束指定活动进程，VB结束指定进程，VB结束活动进程，VB结束进程。

VB结束指定名称的所有活动进程：

Dim objWMIService As Object, colProcesslist As Object, objProcess As Object
Set objWMIService = CreateObject("winmgmts:{impersonationLevel=Impersonate}!root\cimv2")
Set colProcesslist = objWMIService.ExecQuery("select * from win32_process where name='taskmgr.exe'") '结束所有名为“taskmgr.exe”的进程
For Each objProcess In colProcesslist
    objProcess.Terminate
Next