如何取得VB.NET硬盘序列号

VB.NET中有一个特点就是对移动设备的操作。运用这一语言可以对这些设备进行满足我们需求的操作。比如获取硬盘的序列号等等。要实现VB.NET硬盘序列号的获取，需要访问注册表．实际操作如下，建立一个新的窗体，在上面添加一个标签Ｌabel1，一个按钮Ｃommand１，实现：按下按钮，在标签上显示硬盘序列号．#t#

代码：

1. Imports system  
2. Imports Microsoft.Win32  
3. Imports system.Diagnostics  
4. Imports system.Windows.Forms 

以上创建命名空间

1. Private Command1_Click
   (ByVal sender As System.Object,_  
2. ByVal e As System.EventArgs) 
   Handles Command1.Click  
3. Dim myDec As RegistryKey  
4. Dim myScsi As RegistryKey  
5. Dim myPort As RegistryKey  
6. Dim myBus As RegistryKey  
7. Dim myHd As RegistryKey  
8. Dim myInfo As RegistryKey  
9. Dim myHW As RegistryKey  
10. Dim myLM As RegistryKey 

定义获取硬盘序列号的节点

 
 
 

  
  
  
myLM=Registry.LocalMachine  
  
  
  
myHW=myLM.OpenSubKey("HARDWARE")  
  
  
  
myDec=myHW.OpenSubKey("DEVICEMAP")  
  
  
  
myScsi=myDec.OpenSubKey("Scsi")  
  
  
  
myPort=myScsi.OpenSubKey
("Scsi Port 1")  
  
  
  
myBus=myPort.OpenSubKey
("Scsi Bus 0")  
  
  
  
myHd=myBus.OpenSubKey
("Target Id 0")  
  
  
  
myInfo=myHd.OpenSubKey
("Logical Unit Id 0") 
 
 
 

VB.NET硬盘序列号的获取

 
 
 

  
  
  
Me.Label1.Text=
myInfo.GetValue
("Identifier") 
 
 
 

在标签上将VB.NET硬盘序列号的结果显示出来