Dim dic = Computer.CreateComputer.getCPU
For Each key As String In dic.keys
output.show(key & ":" & dic(key))
Next
dic = Computer.CreateComputer.GetVideoController
For Each key As String In dic.keys
output.show(key & ":" & dic(key))
Next
上面这两个要怎么调用写到单元格去，下面信息可以直接调用
Tables("IP_IP").Current("设备信息")=Computer.CreateComputer.GetVersion
Dim str = Computer.CreateComputer.GetCPU_Count
output.show(str)
str = Computer.CreateComputer.GetPhisicalMemory
output.show(str)
str = Computer.CreateComputer.GetDiskSize
output.show(str)
str = Computer.CreateComputer.GetVersion
output.show(str)
加好友 
发短信
Post By：2020/10/30 15:41:00 [只看该作者]
