中文字幕av专区_日韩电影在线播放_精品国产精品久久一区免费式_av在线免费观看网站

溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

VB.NET中怎么獲取硬盤序列號

發布時間:2021-07-24 14:13:15 來源:億速云 閱讀:603 作者:Leah 欄目:編程語言

本篇文章給大家分享的是有關VB.NET中怎么獲取硬盤序列號,小編覺得挺實用的,因此分享給大家學習,希望大家閱讀完這篇文章后可以有所收獲,話不多說,跟著小編一起來看看吧。

VB.NET中有一個特點就是對移動設備的操作。運用這一語言可以對這些設備進行滿足我們需求的操作。比如獲取硬盤的序列號等等。要實現VB.NET硬盤序列號的獲取,需要訪問注冊表.實際操作如下,建立一個新的窗體,在上面添加一個標簽Label1,一個按鈕Command1,實現:按下按鈕,在標簽上顯示硬盤序列號.

代碼:

  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中怎么獲取硬盤序列號,小編相信有部分知識點可能是我們日常工作會見到或用到的。希望你能通過這篇文章學到更多知識。更多詳情敬請關注億速云行業資訊頻道。

向AI問一下細節

免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。

AI

旺苍县| 达日县| 靖边县| 建德市| 沙洋县| 绥江县| 文山县| 白玉县| 唐河县| 固始县| 张家港市| 孟连| 新化县| 女性| 平邑县| 堆龙德庆县| 江阴市| 曲麻莱县| 大丰市| 华阴市| 安新县| 枞阳县| 阳谷县| 蓝山县| 北流市| 余庆县| 盐源县| 大埔县| 章丘市| 高唐县| 临漳县| 广河县| 仪陇县| 尤溪县| 容城县| 宁南县| 烟台市| 大荔县| 浦东新区| 德钦县| 北宁市|