通过WMI列出Windows系统进程（VB.net）

        Dim cmicWmi As New System.Management.ManagementObjectSearcher("SELECT * FROM Win32_Process")

 

        For Each cmicWmiObj As ManagementObject In cmicWmi.Get

            ListBox1.Items.Add("Service: " + cmicWmiObj("Name") + " FilePath: " + cmicWmiObj("ExecutablePath"))

        Next