Vb.net 鼠标单击并关闭菜单后如何保存更改?

Vb.net 鼠标单击并关闭菜单后如何保存更改?,vb.net,Vb.net,很抱歉,如果这是一个非常基本的问题,我无法通过谷歌找到答案 Private Sub Button2_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Button2.MouseClick If Label1.Text = "OFF" Then Label1.Text = "ON" Else Label1.Text =

很抱歉,如果这是一个非常基本的问题,我无法通过谷歌找到答案

Private Sub Button2_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Button2.MouseClick
    If Label1.Text = "OFF" Then
        Label1.Text = "ON"
    Else
        Label1.Text = "OFF"
    End If

End Sub
如何保存“开”或“关”的更改,以便在我关闭.close()并再次打开它时,它仍然存在?如果我想添加颜色或其他也会改变的东西,那么我也可以保存它们。我还想引用其他表单中的信息(ON或OFF文本)

编辑:

我似乎找不到保存设置的方法,尽管我尝试了不同的方法。我在我的设置页面中有一个访问修饰符:Public,然后在字段中有一个设置行:Paalla、String、User、OFF。当我关闭表单,然后从另一个表单再次打开它时,更改就消失了

Private Sub Button2_MouseClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Button2.MouseClick
    If My.Settings.Paalla = "OFF" Then
        Button2.BackColor = Color.Orange
        Label1.Text = "ON"
        My.Settings.Paalla = "ON"
        My.Settings.Save()
    Else
        Button2.BackColor = Color.Gainsboro
        Label1.Text = "OFF"
        My.Settings.Paalla = "OFF"
        My.Settings.Save()
    End If

End Sub

单击按钮,在“属性”窗口中,将应用程序设置(文本属性)设置为一个新变量(因为您刚刚使用了“关闭”和“打开”,我将示例设置为布尔值)

然后在鼠标单击事件中设置变量

Label Text是应用程序设置变量的名称

然后,您需要在加载按钮文本时加载这些设置

Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
If My.Settings.LabelText = True then
    Label1.Text = "ON"
Else: Label1.Text="OFF"
End If
End Sub

查看
My.Settings
另一种可能的方法是在表单关闭之前将所有设置数据写入文件。(进入关闭事件)。然后,当表单再次加载时,只需使用保存的文件更改所有设置。
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
If My.Settings.LabelText = True then
    Label1.Text = "ON"
Else: Label1.Text="OFF"
End If
End Sub