0

我遇到的问题是项目结束后我的设置似乎没有保存。

我的项目由 FrmMain 和 FrmSettings 组成

代码如下:

FrmMain:设置应在主窗体加载时加载

    Private Sub FrmMain_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        '//Load Settings\\
        My.Settings.Reload()
        FrmSettings.settingsTXTsearch.Text = My.Settings.SettingSearchTerm
        '\\Load Settings//
    End Sub

窗体设置:

Private Sub SettingsButtonApply_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SettingsButtonApply.Click
    My.Settings.SettingSearchTerm = settingsTXTsearch.Text
End Sub

我还添加了一个按钮,显示 My.Settings.SettingsSearchTerm 的值是什么,并且它被正确存储,但是一旦项目结束,该值就不会被保存。(使用 me.close() 和 END)

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    MsgBox(My.Settings.SettingSearchTerm)
End Sub

如果您需要我提供更多信息或代码示例,请告诉我。

4

1 回答 1

0

从表单关闭事件中删除 END 命令似乎已经解决了这些问题。感谢原帖中的评论。

代码已删除:

Private Sub Main_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
    Me.Close()
    End
End Sub
于 2014-06-17T14:06:34.807 回答