在VB中用注册表保存软件的设置

IT商界

云飞

　　我们平时使用的软件很多都具有自动保存用户设置的功能，这样每次使用就不必重新设置，非常方便。那么，这些设置保存在哪里呢？当然有多种方法，但注册表无疑是最适合不过了。

　　一、设计思路：利用VB提供的注册表操作函数，在启动程序时读出设置的数据，在关闭程序时，将需要设置的数据写入。

　　二、功能演示：启动程序后，调整窗体的大小和位置；关闭程序后再次启动程序，窗体的大小和位置就是上次关闭时的状态。

　　三、程序设计：新建工程，双击窗体添加以下代码：

　　Private Sub Form_Load()

　　'程序启动时从注册表中读出设置的数据

　　Form1.Top=GetSetting("demo","postion", "top", "0")

　　Form1.Left=GetSetting("demo","postion", "left", "0")

　　Form1.Height=GetSetting("demo","pos tion", "height", "5000")

　　Form1.Width=GetSetting("demo","pos tion", "width", "6500")

　　End Sub

　　Private Sub Form_Unload(Cancel As Integer)

　　'程序关闭时将数据写入注册表

　　SaveSetting "demo","postion","top",Form1.Top

　　SaveSetting "demo","postion","left",Form1.Left

　　SaveSetting "demo","postion","height", Form1.Height

　　SaveSetting "demo","postion","width",Form1.Width

　　End Sub

　　四、运行程序：按下F5键，运行程序。调整窗体大小和位置，关闭，再次打开。发现了什么？当然，这里只是一个例子，具体如何发挥就看你的了。