窗口的BeforeClose
Dim Val As String = e.Form.Controls("TextBox1").Value SaveConfigValue("Any",Val)窗口的AfterLoad
e.Form.Controls("TextBox1").Value = GetConfigValue("Any","")