哈哈 俺昨天晚上新学的.... VB搁下6年了又开始继续学...
用SaveSetting和GetSetting
实际上是保存到注册表
HKEY_CURRENT_USER\Software\VB and VBA Program Settings\下
比如 :
chack1的状态value 和 变量RP的值
窗体关闭时候保存
Private Sub Form_Unload(Cancel As Integer)
SaveSetting App.EXEName, "Config", "RP", RP
SaveSetting App.EXEName, "Config", "Auto", Check1.Value
End Sub
在 HKEY_CURRENT_USER\Software\VB and VBA Program Settings\下生成程序名称的项和config子项 在其下 建立2个键RP和Auto 值为 变量RP和check1的Value
窗体加载时候读取
Private Sub Form_Load()
RP = GetSetting(App.EXEName, "Config", "RP", "")
Check1.Value = GetSetting(App.EXEName, "Config", "Auto", 0)
Text1.Text = RP
End Sub
RP和Auto后面的""和0是没有键值时候的默认值
把它存放在文件中或注册表中
才5分呀