gracias, al final hice esto, lo dejo aqui para to diox
Código PHP:
Private Sub MataProceso()
Dim ListaProcesos As Object
Dim Wmi As Object
Dim ProcesoACerrar As Object
Set Wmi = GetObject("winmgmts:")
Set ListaProcesos = Wmi.InstancesOf("win32_process")
For Each ProcesoACerrar In ListaProcesos
If ProcesoACerrar.Name = "xxxxxxx" Then
List1.AddItem (ProcesoACerrar.Name)
ProcesoACerrar.Terminate
Exit Sub
End If
Next
End Sub
Private Sub Form_Load()
Call MataProceso
End Sub