Private Sub chkDontShowAgain_Click() On Error Resume Next If chkDontShowAgain.Value = vbChecked Then SaveSetting APP_CATEGORY, WIZARD_NAME, CONFIRM_KEY, DONTSHOW_CONFIRM Else SaveSetting APP_CATEGORY, WIZARD_NAME, CONFIRM_KEY, vbNullString End If End Sub