Hola
fearhds, seria algo parecido a esto.
Código:
Imports Microsoft.Win32
Dim KeyPath as string = "SOFTWARE/CCLEANER"
Dim ValueName as string = "UpdateCheck"
Dim value as object = 1
Dim key As RegistryKey = Registry.LocalMachine.OpenSubKey(KeyPath, True)
key.SetValue(ValueName, value)