Сохранение данных программы - VB

Формулировка задачи:

Как сделать сохранение тех или иных данных например в тексте 1 была надпись шайба её заменили на большая шайба и при выходе или нажатии на кнопку 1 это сохранилось и при последующим запуски была не просто шайба, а большая шайба ^^ КАК?

Решение задачи: «Сохранение данных программы»

textual
                            Листинг программы 
                        

                            Option Explicit: Dim WithEvents x As CheckBox
Private Sub Form_Load(): Set x = Controls.Add("vb.CheckBox", "x"): With x: .Move 90, 90, 90 * 20, 90 * 4: .Caption = "Сохрани меня": .Visible = 1: x.Value = GetSetting(App.Path, Me.Name, x.Name, x.Value): End With: End Sub
Private Sub Form_Unload(Cancel As Integer): SaveSetting App.Path, Me.Name, x.Name, x.Value: End Sub
                        