Altrimenti usa il WShell(nei riferimenti aggiungi "Windows Script Host Object Model"):

x scrivere:
Set WshShell = CreateObject("WScript.Shell")

WshShell.RegWrite TuaChiave , "Valore", "REG_DWORD"

TuaChiave può essere ad esempio "HKEY_LOCAL_MACHINE\SOFTWARE\NuovaChiave\valor e" puoi usare un percorso anche esistente.

x leggere:
valore = WshShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\NuovaChiave\valor e")