Dim readValue As String readValue = My.Computer.Registry.GetValue _ ("HKEY_CURRENT_USER\Software\VB and VBA Program Settings\TestKey", "TestValue", Nothing) Label1.Text = readValue
Try Dim key As Microsoft.Win32.RegistryKey key = Microsoft.Win32.Registry.LocalMachine.OpenSubKey("Software\VB and VBA Program Settings\TestKey", True) key.DeleteValue("TestValue") Catch ex As Exception End Try
DeleteSubKey
key.DeleteSubKey("TestValue")
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)