[HELP] How do you add a "Save Settings" code in my menu strip menu?

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
         My.Settings.username = TextBox1.Text
        My.Settings.Save()
        My.Settings.Reload()

        My.Settings.password = TextBox2.Text
        My.Settings.Save()
        My.Settings.Reload()
        End
        End
        'go to properites and make 2 strings called -username- and -password-
    End Sub
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        TextBox1.Text = My.Settings.Username
        TextBox2.Text = My.Settings.Password
    End Sub