|
VB软件设置保存 |
|
| 来自: | 作者:http://www.cpcw.com/ |
|
注册登记表、ini初始化文件、文本文件等,均可保存程序运行中的一些设置。本人因常用VB编写数据库程序,发现用数据库来保存程序的设置非常简单、实用。下面就以保存窗体的背景色为例,介绍其实现方法。 新建一个Accesee数据库PrgSet.mdb(其它形式数据库均可),在数据库中创建表ColorSet,表中建一长整型(Long)字段FormBC;从VB标准EXE 中建窗体Form1,在窗体上添加命令按钮Command1、公共对话框CommonDialog1(从工具箱部件中选择Microsoft Common Dialog Control 6.0)、Data控件Data1。程序代码如下: Private Sub Command1_Click() CommonDialog1.ShowColor On Error GoTo ErrDeal Data1.Recordset.Edit ErrDeal:′空记录时添加新记录 If Err.Number = 3021 Then Data1.Recordset.AddNew Data1.Recordset.Fields("FormBC") = CommonDialog1.Color Data1.Recordset.Update Form1.BackColor = CommonDialog1.Color End Sub ----------------- Private Sub Form_Activate() On Error Resume Next Form1.BackColor = Data1.Recordset.Fields("FormBC") Resume End Sub --------------------- Private Sub Form_Load() Data1.DatabaseName = "C:\Temp\PrgSet.mdb" Data1.RecordSource = "ColorSet" End Sub 运行:按F5运行程序,单击命令按钮,从颜色框中选择适当的颜色,确认后,即可发现窗体的颜色变化,退出程序,重新进入程序又可发现窗体的颜色与退出前一样。 你不仅能用此法保存窗体上文本框的前景色和背景色,还能用此法保存程序的其它设置,赶快行动吧,让它为你的程序添加新光彩。 技巧:1.数据库最好只保留一个记录,用多个字段保存多个设置为佳,省得使用Find去定位查找; 2.数据库表中字段的类型需根据欲保存的数据类型来确定,一般可选择长整型、字节型、字符型等。 本程序在Win98、Vb6运行通过。 |
|