Const HKEY_LOCAL_MACHINE = &H80000002' read the value of a setting for the VB IDE from the Registry' Important: only works with VB6'' Possible values for SettingName are' AlignToGrid (returns 0/1)' BackgroundProjectLoad (0/1)' CollapseWindows (0/1)' FolderView (0/1)' GridHeight, GridWidth (twips)' MainWindow, MainWindowSDI (a space-delimited string' with window's pos, size, state, eg "10 20 745 523 1")' PromptForProjectOnStartup (0/1)' ResolutionGuides (0/1)' SaveBeforeRun (0/1)' SDI (0/1)' ShowClassModuleTemplates, ShowFormTemplates, ShowMDIFormTemplates,' ShowModuleTemplates, ShowUserControlTemplates,' ShowUserDocumentTemplates (0/1)' ShowGrid (0/1)' TemplatesDirectory (complete path)' ShowTooltips (0/1)' If you pass an unrecognized setting name, it raises error 5'' Requires the GetRegistryValue functionFunction GetIDESetting(ByVal SettingName As String) As String ' note that the following registry key name depends ' on the VB version installed GetIDESetting = GetRegistryValue(HKEY_CURRENT_USER, _ "SoftwareMicrosoftVisual Basic6.0", SettingName, "***") If GetIDESetting = "***" Then Err.Raise 5End Function
![Outage Reddit](https://www.devx.com/wp-content/uploads/Outage-Reddit-300x171.jpg)