Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        Debug.WriteLine("MyInt1=" & My.Settings.MyInt1.ToString())
        My.Settings.MyInt1 = 913
    End Sub

MyInt1=33

MyInt1=913

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles Button1.Click
        My.Settings.MyInt1 = 33
        Debug.WriteLine("MyInt1=" & My.Settings.MyInt1.ToString())
    End Sub

MyInt1=33

Those people who think they know everything are a great annoyance to those of us who do - Isaac Asimov