Code:
Private Sub Form1_load
My.Settings.User = TextBox1.Text
My.Settings.Pass = TextBox2.Text
End Sub
Private Sub Button_Click
If CheckBox1.Checked = True Then
My.Settings.User = TextBox1.Text
My.Settings.Save()
My.Settings.Reload()
My.Settings.Pass = TextBox2.Text
My.Settings.Save()
My.Settings.Reload()
End If
End Sub
This should work for you.