Сохранение настроек в MySettings и выход из программы не работает

Question

У меня проблема с сохранением настройки в Мой проект и последующим выходом из программы с оператором «Конец». Если я сохраняю настройку, но не выполняю инструкцию end, все работает. Если я сохраню настройку, а затем выполню «Конец», настройка не будет сохранена. Вот некоторый код, который иллюстрирует проблему:

Publi c Форма класса 1

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    'reads the last setting correctly
    TextBox1.Text = My.Settings.MySetting
End Sub

Private Sub btnWrite_Click(sender As Object, e As EventArgs) Handles btnWrite.Click
    'write value, don't exit; works
    My.Settings.MySetting = TextBox1.Text
End Sub

Private Sub btnWriteEnd_Click(sender As Object, e As EventArgs) Handles btnWriteEnd.Click
    'write value and end; fails
    My.Settings.MySetting = TextBox1.Text
    End
End Sub

Конечный класс

Когда я выполняю код, все, что было последним в My.Settings . MySetting появляется в TextBox1. Если я изменю текст в текстовом поле и нажму кнопку «Написать» и вручную выйду из программы, щелкнув «X», новый текст будет отображаться правильно, когда я снова выполню программу. Если я изменю текст и выйду программным путем, нажав «WriteEnd», измененный текст настройки не будет записан в «MySetting».

Что я делаю неправильно?

Спасибо

Answer 1

Настройки будут автоматически сохраняться при выключении по умолчанию, поэтому обычно не нужно звонить Save. End это определенно проблема. НИКОГДА не используйте End. Позвоните Close в форме запуска или позвоните Application.Exit. Я сравниваю End с вышибалой, которая схватила кого-то за шею и выбросила его, выплеснув напиток на всех и оставив куртку позади, вместо того, чтобы просить их уйти по собственному желанию.