Я пишу код для получения информации о компьютере, используя vb net и wmi.
однако я не могу перебрать результат запроса wmi. Таким образом, он может добавить только последний результат в просмотр списка.
Dim objdisk As ManagementObjectSearcher
Dim objMgmt As ManagementObject
objdisk = New ManagementObjectSearcher("SELECT * FROM Win32_logicaldisk")
For Each objMgmt In objdisk.Get
dim countstorage as integer=1
harddiskdeviceid= objMgmt("caption").ToString
harddiskfreespace= objMgmt("freespace").ToString()
listviewstorage.Items.Add(harddiskdeviceid.ToString)
listviewstorage.Items(countstorage - 1).SubItems.Add(harddiskfreespace.ToString)
countstorage = countstorage-1
Next
Я знаю, что это должно быть потому, что я использую для каждого цикла вместо цикла,
но я не могу найти способ использовать цикл с ManagementObject.
есть ли способ сделать что-то вроде
for x as integer = 0 to objdisk.items.count
listviewstorage.Items.Add(harddiskdeviceid.ToString)
listviewstorage.Items(x).SubItems.Add(harddiskfreespace.ToString)
next