OK Button Window Save:- ========================= Private Sub OK_BUTTON_Click() SaveSetting "NODE-RUNNER-SLEEPER", "Settings", "WINDOW-NAMELeft", Me.Left ' Position SaveSetting "NODE-RUNNER-SLEEPER", "Settings", "WINDOW-NAMETop", Me.Top ' Position SaveSetting "NODE-RUNNER-SLEEPER", "Settings", "WINDOW-NAMEWidth", Me.Width ' Size SaveSetting "NODE-RUNNER-SLEEPER", "Settings", "WINDOW-NAMEHeight", Me.Height ' Size Unload Me End Sub ===================== DEFAULT CODE:- ----------------- rivate Sub Form_Unload(Cancel As Integer) Dim i As Integer 'close all sub forms For i = Forms.Count - 1 To 1 Step -1 Unload Forms(i) Next If Me.WindowState <> vbMinimized Then SaveSetting "NODE-RUNNER-SLEEPER", "Settings", "AboutMainLeft", Me.Left SaveSetting "NODE-RUNNER-SLEEPER", "Settings", "AboutMainTop", Me.Top SaveSetting "NODE-RUNNER-SLEEPER", "Settings", "AboutMainWidth", Me.Width SaveSetting "Node-RUNNER-SLEEPER", "Settings", "AboutMainHeight", Me.Height End If End Sub