Question

Dim obj As ManagementObject
Dim searchObj As New ManagementObjectSearcher("Select * from Win32_Account")

For Each obj In searchObj.Get()
   MsgBox(obj("Name"))
Next

我有一个在Load事件中具有高位代码的表单。这将返回大约23个帐户，然后停止，表单不显示。我猜它仍在搜索，但我让应用运行了几分钟而没有。

另外，对于测试，我在创建15个帐户并显示表单后添加了退出例程。

任何人都可以帮助我吗？我只是想找到帐户并显示它们，但例程会永远运行

Answer 1

在另一个论坛找到解决方案：

SELECT * FROM Win32_Account WHERE LocalAccount = TRUE

Win32_Account上的wmi查询不会停止

1 个答案: