0

現在、「設定」フォームを使用して、アプリケーションのさまざまな設定を行っています。私がやろうとしているのは、フィールドを開いて変更する前にユーザーが行った変更の前に設定を戻すことです。設定にデータがバインドされたテキスト ボックスがあり、変更を加えて [OK] をクリックすると、次に開いたときに保存されます。キャンセルを押すと保存されます。私がこれに正しく近づいているかどうかはよくわかりません。

Public Class frmSettings
    Private _mysettings As Configuration.SettingsBase

    Private Sub frmSettings_Load(...) Handles Me.Load
        _mysettings = My.Settings
    End Sub

    Private Sub btnCancel_Click(...) Handles btnCancel.Click
        For Each p As Configuration.SettingsPropertyValue In _mysettings.PropertyValues
            My.Settings(p.Name) = p.PropertyValue
        Next
        Me.Close()
    End Sub

    Private Sub btnOkay_Click(...) Handles btnOkay.Click
        My.Settings.Save()
        Me.Close()
    End Sub
End Class
4

1 に答える 1