Hallo,
versuche nun schon eine Weile meine Hardware auszulesen und scheitere an den Prozessoren.
Anhand der Msgbox kann ich erkennen, dass er nur einmal die for-next-Schleife durchläuft. Mein Computer verfügt aber über vier Kerne. Was mache ich hier falsch?
versuche nun schon eine Weile meine Hardware auszulesen und scheitere an den Prozessoren.
VB.NET-Quellcode
- Sub Prozessor_ermitteln()
- Dim cpuItem As Object
- Dim cpu As Object
- cpuItem = GetObject("winmgmts:").InstancesOf("Win32_Processor")
- cpuItem.Count.ToString.Trim()
- For Each cpu In cpuItem
- Application.DoEvents()
- MsgBox("Lese ")
- With Verwaltung.TreeView_Hardware
- .Nodes(0).Nodes.Add("Prozessor CPU - ID : " & cpu.ProcessorId)
- .Nodes(0).Nodes.Add("Bezeichnung : " & Trim$(cpu.name))
- .Nodes(0).Nodes.Add("Taktrate (MHz) : " & cpu.MaxClockSpeed)
- End With
- NextcpuItem = Nothing
- End Sub
Anhand der Msgbox kann ich erkennen, dass er nur einmal die for-next-Schleife durchläuft. Mein Computer verfügt aber über vier Kerne. Was mache ich hier falsch?
Gruß Markus