Hola. Create un formulario llamado Form1, y en el pon un CheckBox, llamado Check1. Depués añade este código.
Private Sub Form_Load()
Check1.Value = GetSetting(App.Title, Form1.Name, Check1.Name, vbChecked)
End Sub
Private Sub Form_Unload(Cancel As Integer)
SaveSetting App.Title, Form1.Name, Check1.Name, Check1.Value
End Sub
Tendrás que hacer lo mismo con cada uno de los controles de tu formulario.
Se podría hacer incluso un procedimiento para guardar en un bucle todas las propiedades de todos los controles de un formulario, pero eso te lo dejamos investigar a vos.
en caso de que fuera un texto un label se reemplaza el codigo por las propiedades de un texto, por ejemplo
Private Sub Form_Load()
text1.text = GetSetting(App.Title, Form1.Name, text1.name, vbChecked)
End Sub
Private Sub Form_Unload(Cancel As Integer)
SaveSetting App.Title, Form1.Name, text1.name, text1.text
End Sub
para una label seria igual pero con label1.caption..