通过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"))

本文地址：http://com.8s8s.com/it/it43708.htm