【发布时间】:2015-04-08 08:34:29
【问题描述】:
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 个帐户并显示表单后添加了一个退出例程。
谁能帮帮我? 我只想找到帐户并显示它们,但例程永远运行
【问题讨论】: