Question

VB获取当前正在运行的进程,一定要名字.不要路径

我在网上搜了很久都没有搜到，我想要的是在窗体中有一个按钮Command1和一个List1控件。单击按钮后，系统下正在运行的进程名字显示在LIST1中.谢谢了.

Answer 1

Private Declare Function EnumProcesses Lib "PSAPI.DLL" (ByRef lpidProcess As Long, ByVal cb As Long, ByRef cbNeeded As Long) As Long

Private Sub Command1_Click()
Dim tObj As Object, Obj As Object
Set tObj = GetObject("WinMgmts:").InstancesOf("Win32_Process")
For Each Obj In tObj
List1.AddItem Obj.Name
Next
End Sub