如何在MouseClick和關閉菜單後保存更改？

-1

如果這是一個非常基本的問題，我很抱歉，我無法通過Google找到答案。如何在MouseClick和關閉菜單後保存更改？

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

如何保存「開」或「關」的變化，所以，當我關閉與Me.Close（），並與Me.Show（）再次打開它，它仍然存在？如果我想添加顏色或其他也改變的東西，那麼我也可以保存它們。我也想從其他形式中引用這些信息（ON或OFF文本）。

編輯：

我似乎無法找到一個方法來保存我的設置，即使我已經嘗試了不同的方式。我在我的設置頁訪問修飾符：公開，然後一個設置行：Paalla，字符串，用戶，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

來源

2015-01-15 koalafoot

負重望按鈕上的文字成'My.Settings' – Plutonix

另一種可能的方式是所有的設置數據的寫入形式收盤前一個文件。（進入FormClosing事件）。然後，當表單再次加載時，只需使用保存的文件更改所有設置。 –

單擊按鈕，並在屬性窗口中設置的應用程序設置（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" 
    My.Settings.LabelText = True 
    My.Settings.Save() 
Else 
    Label1.Text = "OFF" 
    My.Settings.LabelText= False 
    My.Settings.Save() 
End If 

End Sub

名稱

然後，你需要加載這些設置，當你

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

來源

2015-01-16 00:37:57 Dman

如何在MouseClick和關閉菜單後保存更改？

回答

相關問題