Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As _
      System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
        My.Settings.height = Me.Location.X
        My.Settings.width = Me.Location.Y
        My.Settings.Save()
 
    End Sub
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        If My.Settings.width = Nothing Or My.Settings.height = Nothing Then
        Else
            Me.Location = New Point(My.Settings.height, My.Settings.width)
 
        End If
    End Sub