Бывает так, что надо сохранить состояние переключателей, текст в текстовых окошках и т.д. Лучше всего все параметры сохранять в реестре. Для примера поместите на форму 2 OptionButton (пусть они будут в виде массива т.е. свойство Name у обоих контролов установите как Option1), 1 CheckBox и 1 TextBox. Введите следующий код:

Private Sub Form_Load()
' Устанавливаем значение Value=True у того переключателя,
' чей индекс записан в реестре
Option1(Val(GetSetting("App", "testprogramm", "option"))).Value = True
' Считываем из реестра текст в текстовое окно
Text1.Text = GetSetting("App", "testprogramm", "text")
' Считываем значение Value для Check1
Check1.Value = Val(GetSetting("App", "testprogramm", "check"))
End Sub

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Dim i As Integer
' Аналогичный код можно написать для любого
' числа переключателей
For i = 0 To 1
' Если свойство переключателя Value=True,
' то записываем его индекс в реестр
If Option1(i).Value = True Then
SaveSetting "App", "testprogramm", "option", i
Exit For
End If
Next
' Записываем в реестр текст из текстового окна
SaveSetting "App", "testprogramm", "text", Text1.Text
' Записываем в реестр значение Check1
SaveSetting "App", "testprogramm", "check", Check1.Value
End Sub