public class Test public Shared Sub Main Console.WriteLine(My.Computer.Registry.GetValue("HKEY_CURRENT_USER\Software\yourname\subname\","PromptOnExit", "0")) End SubEnd Class