利用VB.NET访问注册表
创新互联基于分布式IDC数据中心构建的平台为众多户提供成都移动云计算中心 四川大带宽租用 成都机柜租用 成都服务器租用。
译者注：访问注册表的例子比较多，然而通过VB.NET访问注册表的例子并不多，本文翻译了一篇MSDN上的利用VB.NET存取注册表的例子，挺详细也挺全面的。
(
)
Cat
Francis
Visual
Studio
Team
Microsoft
Corporation
April
2002
摘要：这篇文章描述了利用VB.NET内置函数DeleteSetting,
GetAllSettings,
GetSetting
和
SaveSetting，以及通用语言运行时的两个类Registry
和
RegistryKey来存取注册表的实例，详述了所需的权限，解释了何时利用注册表编辑器，并向你展示了如何利用程序从注册表中动态的读取数据及如何写入数据。
引言
当用VB.NET进行编程时，你可能会选择用VB.NET或.NET框架中的Registry类中的函数来访问注册表。虽然大多数情况下VB.NET的内置函数足够用了，然而某些情况下你仍然需要.NET框架类来解决问题。
注册表不仅存储了本地机上一些程序的信息，还保存了操作系统的信息。操作注册表可能会有危险。因此编程时必须谨慎的查看代码，确保程序对所运行的机器上的安全不会构成威胁。
注册表入口点包括两部分：键名和键值。入口点是存储在系统中的键和子键，类似于文件系统中的目录和子目录。
必备知识
要想读懂本文需要有如下的必备知识：
1、熟悉上一个版本的Visual
Basic。
2、注册表设计和利用的知识。
3、理解访问注册表的安全含义。
用VB.NET内置函数访问注册表
VB.NET提供了四个访问注册表的函数，为了使用它们，首先必须有读写权限。任何运行在全信任模式下的代码都必须有访问注册表的必要的权限。可以查看RegistryPermission类从而
Imports Microsoft.Win32
Dim RegKey As RegistryKey
Dim ObjRegistry As RegistryKey = Registry.LocalMachine
RegKey = ObjRegistry.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Run", True)
If RegKey.GetValue("启动项名称") = "" Then
RegKey.SetValue("启动项名称", Environment.CurrentDirectory "\你的程序名称.exe")
End If
RegKey.Close()
微软在net里内置了一一些提供注册表操作的类，因此我们可以很轻松的操作注册表
导入名词称空间 imports Microsoft.Win32
Dim reg As RegistryKey
Dim regStr As String
reg = Registry.LocalMachine
reg = reg.OpenSubKey("SYSTEM\CurrentControlSet\Enum\USB", True)
regStr = reg.GetValue("VID_08E2PID_0006")
if regstr.tostring ""then …复制文件
Sub Button1Click(sender As Object, e As EventArgs)
'HKEY_CLASSES_ROOT\.doc
Dim Root1 As RegistryKey = Registry.ClassesRoot
'打开"SYSTEM"子健
Dim key1 As RegistryKey = Root1.OpenSubKey ( ".doc" ,true )
'打开".doc"子健
textBox1.Text =key1.GetValue(String.Empty)
End Sub
