WMI的问题,顶也有分.
strClsName = strClsName.Trim()
Dim mc As ManagementClass = New ManagementClass("Win32_UninterruptiblePowerSupply")
Dim moc As ManagementObjectCollection = mc.GetInstances()
Dim strMsg As String = "Nothing"
For Each mo As ManagementObject In moc
...不执行
Next
为什么关于"电源"的类都不能得到其实例
Win32_AssociatedBattery, Win32_Battery, Win32_CurrentProbe, Win32_PortableBattery ,Win32_PowerManagementEvent .等都不能得到其实例.
解决了这个问题,连这个帖子的分也给你. http://community.csdn.net/Expert/topic/3790/3790724.xml?temp=4.140872E-02