vb.net - DWORDs Decimal 値を Hexadecimal に追加します

Question

レジストリに新しい値を書き込む必要があります。追加できるのは標準キーであり、新しい 10 進数値を DWORD キーに配置する必要があるため (16 進数値の代わりに)、次のコードで行き詰まりました。

{Dim wsh wsh = CreateObject("WScript.shell") wsh.regwrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer\NoDrives\dword", "789")}

Answer 1

私は次のようなものを使用します：

Imports Microsoft.Win32

Sub SetNoDrives(value As Integer)
    Dim RegPath As String = "SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer"
    Using Key As RegistryKey = Registry.LocalMachine.OpenSubKey(RegPath)
        Key.SetValue("NoDrives", value, RegistryValueKind.DWord)
    End Using
End Sub