如何使用WindowsWMI組件來識別CPUID

字號:

Getcpuid.dll 獲取的id只有8位,下面簡短的代碼返回的是16位16進(jìn)制的字符串。
    首先必須引用 Microsoft WMI Scripting Library
    Option Compare Database
    Sub wmiProcessorID()
    Dim cpuSet As SWbemObjectSet
    Dim cpu As SWbemObject
    Set cpuSet = GetObject( "winmgmts:{impersonationLevel=impersonate}"). _
    InstancesOf( "Win32_Processor")
    For Each cpu In cpuSet
    MsgBox cpu.ProcessorId
    Next
    End Sub