檢查regkey vb.net

Question

我不能得到下面的代碼來檢查我的regestrykey是否存在可以幫助一些人。這個想法是檢查如果這樣做什麼，如果不是創建它，與它的價值以及它的存在......

全鍵HKEY_LOCAL_MACHINE \ SOFTWARE \ VTS \高級偏移2次\管理\訪問

>   If Dir$("HKEY_LOCAL_MACHINE\SOFTWARE\VTS\Advanced Offset 2\Admin", vbDirectory) <> "" Then 

     Else 
      MsgBox(".NET Framework 2.0") 

     End If 

更新的代碼：

Dim l_subKeyPath As String = "SOFTWARE\VTS\Advanced Offset 2\Admin\Access" 
Dim l_regKey As RegistryKey = My.Computer.Registry.LocalMachine.OpenSubKey(l_subKeyPath, False) 
If (l_regKey Is Nothing) Then 
    'if nothing then key doesn't exists 
    'Registry.SetValue("HKEY_LOCAL_MACHINE\SOFTWARE\VTS\Advanced Offset 2\Admin", "ACCESS", "PASSWbORD") 
    MsgBox("yess") 
Else 
    'key exists 
    MsgBox("no") 
End If 

Answer 1

試試這個：

Dim l_subKeyPath as string = "SOFTWARE\VTS\Advanced Offset 2\Admin\Access" 
    Dim l_regKey As RegistryKey = My.Computer.Registry.LocalMachine.OpenSubKey(l_subKeyPath, False) 
    If (l_regKey Is Nothing) Then 
     'if nothing then key doesn't exists 
    else 
     'key exists 
    End If 

引述MSDN：

RegistryKey.OpenSubKey Method

如果請求的鍵不存在，這個方法返回Nothing，而不是拋出異常。

Answer 2

你說「檢查它是否存在，如果沒有創建它，連同它的值...」。 如果您使用某個鍵，則還需要創建一個NAME併爲該名稱添加一個值，但不能爲該鍵添加值。

採取看看在MSDN OpenSubKey