Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
窗口的BeforeClose
Dim Val As String = e.Form.Controls("TextBox1").Value
SaveConfigValue("Any",Val)
窗口的AfterLoad
e.Form.Controls("TextBox1").Value = GetConfigValue("Any","")
ComboBox控件ValueChanged事件
Dim s As String = GetConfigValue("List","")
SaveConfigValue("List",s & "|" & e.Sender.Value)
Enter事件
e.Sender.ComboList = GetConfigValue("List","")