主题：老爹,14号更新提取硬件信息出错..

运行如下代码：
 

If HardWareInfo.Ready = False '如果没有初始化
    HardWareInfo.Initialize '初始化HardWareInfo,提取硬件信息
End If
Output.Show("CPU信息")
With HardWareInfo.CPU
    Output.Show("制造商:" & .Manufacturer)
    Output.Show("品名:" & .Name)
    Output.Show("型号:" & .Description)
    Output.Show("序列号:" & .ProcessorId)
End With
Output.Show(Chr(13) & Chr(10))
Output.Show("主板信息")
With HardWareInfo.BaseBoard
    Output.Show("制造商:" & .Manufacturer)
    Output.Show("型号:" & .Product)
    Output.Show("序列号:" & .SerialNumber)
End With
Output.Show(Chr(13) & Chr(10))
Output.Show("硬盘信息")
With HardWareInfo.Disk
    Output.Show("型号:" & .Model)
    Output.Show("序列号:" & .Signature)
End With
Output.Show(Chr(13) & Chr(10))
Output.Show("BIOS信息")
With HardWareInfo.Bios
    Output.Show("厂商:" & .Manufacturer)
    Output.Show("序列号:" & .SerialNumber)
End With