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

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

创新互联来电联系:18980820575,为您提供成都网站建设网页设计及定制高端网站建设服务,创新互联网页制作领域10年,包括成都假山制作等多个领域拥有多年的网站运维经验,选择创新互联,为企业保驾护航!

代码:

  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

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

 
 
 
  1. myLM=Registry.LocalMachine
  2. myHW=myLM.OpenSubKey("HARDWARE")
  3. myDec=myHW.OpenSubKey("DEVICEMAP")
  4. myScsi=myDec.OpenSubKey("Scsi")
  5. myPort=myScsi.OpenSubKey
    ("Scsi Port 1")
  6. myBus=myPort.OpenSubKey
    ("Scsi Bus 0")
  7. myHd=myBus.OpenSubKey
    ("Target Id 0")
  8. myInfo=myHd.OpenSubKey
    ("Logical Unit Id 0")

VB.NET硬盘序列号的获取

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

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

网站名称:如何取得VB.NET硬盘序列号
标题来源:http://www.zyruijie.cn/qtweb/news6/4556.html

网站建设、网络推广公司-创新互联,是专注品牌与效果的网站制作,网络营销seo公司;服务项目有等

广告

声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 创新互联