请问怎样保存对复选框操作的结果？

Question

程序再次运行时保留仍然保留上次操作的结果  谢谢！

Answer 1

northwolves(野性的呼唤) ( ) 信誉：100 
有创意

Answer 2

这点小东东也保存到数据库里?
建议保存到注册表.
用savesetting函数.

Answer 3

Option ExplicitPrivate Sub Command1_Click()
    SaveSetting "MyApp", "Startup", "Left", Check1.Value
End SubPrivate Sub Form_Load()    Check1.Value = GetSetting("MyApp", "Startup", "Left", 0)
End Sub