|
Public Sub getCpuId()
Try
Dim mc As Management.ManagementClass
Dim moc As Management.ManagementObjectCollection
Dim mo As Management.ManagementObject
mc = New Management.ManagementClass("win32_processor")
moc = mc.GetInstances()
For Each mo In moc
strCpuId = mo.Properties("processorid").Value.ToString()
Next mo
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
AspNet技術(shù):.net獲取硬件信息_CPU序列號(hào),轉(zhuǎn)載需保留來(lái)源!
鄭重聲明:本文版權(quán)歸原作者所有,轉(zhuǎn)載文章僅為傳播更多信息之目的,如作者信息標(biāo)記有誤,請(qǐng)第一時(shí)間聯(lián)系我們修改或刪除,多謝。