Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
  System.EventArgs) Handles MyBase.Load
 'prüfen ob es sich um eine neuere Version Ihrer Anwendung handelt
 If My.Settings.Update = False Then
 'einstellungen übernehmen
 My.Settings.Upgrade()
 My.Settings.Update = True
 My.Settings.Save()
 End If 
 Me.CheckBox1.Checked = My.Settings.Checked
End Sub