一聚教程网:一个值得你收藏的教程网站

最新下载

热门教程

VB.net获取CPU与硬盘物理序列号与容量的实例

时间:2013-12-30 编辑:简简单单 来源:一聚教程网

首先,引用System.Management;然后在代码中Imports System.Management;

以下功能主要依靠wmi实现

获得硬盘序列号

 代码如下 复制代码
Dim cmicWmi As New System.Management.ManagementObjectSearcher("SELECT * FROM Win32_DiskDrive")
   Dim Uint32 As UInt32
   For Each cmicWmiObj As ManagementObject In cmicWmi.Get
   Uint32 = cmicWmiObj("signature")
   Next
   TextBox1.Text = Uint32.ToString

  

获得CPU序列号

 代码如下 复制代码

Dim Wmi As New System.Management.ManagementObjectSearcher("SELECT * FROM Win32_Processor")
   Dim Uint32 As String
   For Each WmiObj As ManagementObject In Wmi.Get
   Uint32 = WmiObj("ProcessorId")
   Next
   TextBox1.Text = Uint32

获得硬盘总容量

 代码如下 复制代码
   Dim Wmi As New System.Management.ManagementObjectSearcher("SELECT * FROM Win32_DiskDrive")
   Dim Uint64 As UInt64
   For Each WmiObj As ManagementObject In Wmi.Get
   Uint64 = WmiObj("size")
   Next
   TextBox1.Text = Uint64.ToString

 

热门栏目