Excel 这段代码怎么查看自己电脑的硬盘序列号
发布网友
发布时间:2022-02-23 07:05
我来回答
共1个回答
热心网友
时间:2022-02-23 08:34
Sub Macro1()
Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
Set colDevices = objWMIService.ExecQuery("Select * From Win32_Processor")
For Each objDevice In colDevices
ID = objDevice.ProcessorID
MsgBox ID
Next
End Sub