vb.net - BC30451 'RegistryValueKind' 未声明

Question

我想尝试更改 Internet 设置级别VB.NET

Public Class Form1


Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim regKey As Microsoft.Win32.RegistryKey

    regKey = Microsoft.Win32.RegistryKey.OpenBaseKey("Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\", True)

    regKey.SetValue("2400", 0, RegistryValueKind.DWord)

End Sub

End Class

我收到此错误： 未声明 BC30451 'RegistryValueKind'。由于其保护级别，它可能无法访问。

有什么解决办法吗？

Answer 1

regKey =首先，当您运行代码时，您应该在尝试将其实例设置为空时抛出异常。当尝试使用它时，它会失败。您的错误消息与未导入的状态Import Microsoft.Win32相同：@Mark 提到的命名空间。当您实际导入此命名空间时，您将遇到我上面提到的问题...请参阅下面的解决方案。

久经考验

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
    Dim regKey As Microsoft.Win32.RegistryKey = Registry.CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3\", True)
    If regKey IsNot Nothing Then regKey.SetValue("2400", 0, RegistryValueKind.DWord) : regKey.Close()

End Sub

我也可以将其更改回来和第四次。完成后请不要忘记Close按键，在我的代码中就是这样做的。