vb.net注册表 vs注册表

vb.net增加注册表键值

'你的错误：

'注册表中如果不存在子键"SOFTWARE\Wow6432Node\Microsoft\Internet Explorer\MAIN\FeatureControl\FEATURE_BROWSER_EMULATION"

'你怎么能打开它呢？

'已帮你改好

Option Explicit On

Option Strict On

Module Program

Sub Main()

Dim key As Microsoft.Win32.RegistryKey=Microsoft.Win32.Registry.LocalMachine.OpenSubKey("SOFTWARE\Wow6432Node\Microsoft\Internet Explorer\MAIN\FeatureControl\FEATURE_BROWSER_EMULATION", True)

If key Is Nothing Then

key=Microsoft.Win32.Registry.LocalMachine.CreateSubKey("SOFTWARE\Wow6432Node\Microsoft\Internet Explorer\MAIN\FeatureControl\FEATURE_BROWSER_EMULATION")

End If

Dim subkey As Microsoft.Win32.RegistryKey=key.CreateSubKey("2.exe")

subkey.SetValue("REG_DWORD", 111111, Microsoft.Win32.RegistryValueKind.DWord)

subkey.Close()

key.Close()

Console.Write("Press any key to continue . . . ")

Console.ReadKey(True)

End Sub

End Module

相关问答

Q1: VB.NET里怎么更改注册表? 具体什么格式

.net2005 中My.Computer.Registry 对象的 CreateSubKey 方法可用于创建注册表项。

过程

创建注册表项

使用 CreateSubKey 方法，指定在其下放置注册表项的配置单元以及注册表项的名称。参数 Subkey 不区分大小写。此示例在 HKEY_CURRENT_USER 下创建注册表项 MyTestKey。

My.Computer.Registry.CurrentUser.CreateSubKey("MyTestKey")

创建注册表项并在注册表项中设置值

使用 CreateSubkey 方法，指定在其下放置注册表项的配置单元以及注册表项的名称。此示例在 HKEY_CURRENT_USER 下创建注册表项 MyTestKey。

My.Computer.Registry.CurrentUser.CreateSubKey("MyTestKey")

用 SetValue 方法设置值。此示例将字符串值"MyTestKeyValue" 设置为 "This is a test value"。

My.Computer.Registry.SetValue("HKEY_CURRENT_USER\MyTestKey", _

"MyTestKeyValue", "This is a test value.")

Q2: VB.NET存取注册表项的几个函数

1、首先引用命名空间：using Microsoft.Win32; 

2、几个基本主键：

Registry.ClassesRoot;对应于HKEY_CLASSES_ROOT主键

Registry.CurrentUser;   对应于HKEY_CURRENT_USER主键

Registry.LocalMachine;   对应于 HKEY_LOCAL_MACHINE主键

Registry.User;   对应于 HKEY_USER主键

Registry.CurrentConfig;   对应于HEKY_CURRENT_CONFIG主键

Registry.DynDa; 对应于HKEY_DYN_DATA主键

Registry.PerformanceData; 对应于HKEY_PERFORMANCE_DATA主键

3、返回或创建一个注册表键

 Dim Key1 As Microsoft.Win32.RegistryKey

 Key1 = My.Computer.Registry.CurrentUser   '返回当前用户键

 Dim Key2 As Microsoft.Win32.RegistryKey

 Key2 = Key1.OpenSubKey("northsnow")       '返回当前用户键下的northsnow键

 If Key2 Is Nothing Then

    Key2 = Key1.CreateSubKey("northsnow")  '如果键不存在就创建它

 End If

vb.net注册表的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vs注册表、vb.net注册表的信息别忘了在本站进行查找喔。