| Visual Basic 提供了一个标准的注册表位置以存储创建于 Visual Basic 的应用程序的程序信息,同时VB也提供了几个标准的语句或函数来处理存储在应用程序注册位置的程序设置如GetSetting函数、SaveSetting 语句、DeleteSetting 语句。本例的历史记录(是最近打开文件的记录,例如WORD软件)就是用这几个函数实现的。 为了学习方便,提供的源码已经作了详细的中文注释,看看源码框中的代码: 如下所示就是现在名为DEMO的程序的程序信息在注册表中所处的位置,VB提供的标准注册表位置是在: HKEY_CURRENT_USER\Software\VB and VBA Program Settings\appname\ 下,假设我们当前程序名为DEMO,则在注册表的相应位置就可以看到程序的信息。  下面一起看看怎么用上面提到的几个函数和语句对注册表进行操作。这几个函数的作用分别是: GetSetting 函数 检索注册表设置值。 SaveSetting 语句 保存或创建注册表设置值。 GetAllSettings 函数 返回一个包含多项注册表设置值的数组。 DeleteSetting 语句 删除注册表设置值。 以GetSetting 函数为例,GetSetting 函数使用的语法为: GetSetting(appname, section, key[, default]) 各参数的意义如下表: | 参数: | appname | section | key | default | | 意义: | 应用程序名称 | 表的名称 | 表项的名称 | 表项的值 | 函数的返回值是得到的键值。例如我们使用下面语句: Filename1= GetSetting("Demo", "RFile", "File1", "") 就能得到上图所示的第二条历史记录的值。 其它函数的用法分别为: SaveSetting(appname,section, Key, Value) DeleteSetting(appname, section, key) 各个参数的意义跟 GetSetting函数是相同的。 在例程序中,每次打开一个文件,程序会判断这个文件是不是历史记录中已有的记录,如果不是,便通过SaveSetting语句将文件的路径写入注册表,而当选择“清除历史记录”时,程序通过DeleteSetting 语句删除所有的历史记录。 使用这几个函数,还能实现其它的功能,比如保存程序的初始化设置,保存密码等,我们都可以仿照源程序中的语句来实现,如果有兴趣的话,试一试吧。 |