| 域名空间 下载中心 社区论坛 信息公告 MY小屋 |
![]() |
联系我们 设为首页 加入收藏 |
|
首页 | 新闻资讯 | 编程开发 | 网页设计 | 图形图象 | 网络媒体 | 网站模板 | 数 据 库 | 投稿 论坛 | 操作系统 | 系统优化 | 网络安全 | 黑客技术 | 硬件学堂 | 硬件报价 | 服 务 器 | 地图 专题 | 应用软件 | 聊天通讯 | Q Q 专栏 | 建站经验 | 在线工具 | 站长Club | 注 册 表 | 旧版 社会 | 游戏娱乐 | 设计欣赏 | 疑难解答 | 社区论坛 | 韩国素材 | 素材图库 | 广告服务 | 服务 |
| 新版上线![旧版] | |||||
注:打开慢时请稍等
编程解决注册表问题所需的函数详解http://www.iyit.net 日期:2006-6-28 18:17:27 来源: 点击: |
● 使用 Visual Basic 来操作注册表 在VB中处理注册表,通常有两种途径:一是利用VB自身的函数;二是调用 Windows API 函数来操作注册表。 一、 MicroSoft Visual Basic 中对于注册表的操作函数 说明:在 Visual Basic 6.0 内部,为了存储创建于 VB 的应用程序的程序信息,已经提供了一个标准的注册位置(如图1):HKEY_CURRENT_USER\Software\VB and VBA Program settings\(为了叙述简单,以下将这一位置简称“标准位置”)。
MicroSoft Visual Basic 中对于注册表的操作函数共有4个,它们是 SaveSetting, GetSetting, GetAllSettings, DeleteSettings等。 1、SaveSetting 在 Windows 注册表中保存或建立应用程序项目 语法 SaveSetting appname, section, key, setting 参数 appname:字符串表达式,包含应用程序或工程的名称,是标准位置下的一个子键。 section:字符串表达式,包含区域名称,是 appname 下的一个子键。 key:字符串表达式,标准位置\appname\section子键的键名(Value Name)。 setting:字符串表达式,包含 key 的设置值。 www.xker.com(小新技术网) 函数示例 下列示例先使用 SaveSetting 语句,来建立Windows标准位置(或 16位 Windows 平台的 ini 文件)里 “我的工程”应用程序的项目,然后使用 DeleteSetting 语句将之删除。因为没有指定 key参数,整个子键都会被删除掉,包括子键名称及其所有的键值(key)。 ' 在标准位置中添加一些设置值。 SaveSetting appname := "我的工程", section := "我的子键", key := "Top", setting := 75 SaveSetting "我的工程","我的子键", "Left", 50 ' 删除子键及所有的设置值。 DeleteSetting "我的工程", "我的子键" ①在注册表中添加一些设置值。用 SaveSetting 语句在标准位置下建立名为“我的工程\我的子键”的子键。 SaveSetting appname := "我的工程", section := "我的子键", key := "Top", setting := 75 SaveSetting "我的工程", "我的子键", "Left", 50 ②删除子键及所有的设置值。 DeleteSetting "我的工程", "我的子键" 2、GetSetting 从 Windows 注册表中的应用程序项目返回注册表项设置值 语法 GetSetting appname, section, key[, default] 参数 appname:字符串表达式,包含应用程序或工程的名称。 section:字符串表达式,包含区域名称,要求该区域有注册表项设置。 key:字符串表达式,返回注册表项设置的名称。 default:可选。表达式,如果注册表项设置中没有设置值,则返回缺省值。如果省略,则 default 取值为长度为零的字符串 ("")。 说明 如果 GetSetting 无参数,则 GetSetting 返回 default 的值 函数示例 使用 SaveSetting 语句建立 appname 应用程序的项目,然后使用 GetSetting 函数得到其中一项设置并显示出来。因为有传入参数 default,GetSetting 函数一定会有返回值。请注意,section 名称不能用 GetSetting 函数取得。最后,使用 DeleteSetting 语句将该应用程序项删除。 ①定义保存 GetSetting 函数返回之二维数组数据的变量 Dim MySettings As Variant ②在注册表中添加项目 SaveSetting "我的工程","我的子键", "Top", 75 SaveSetting "我的工程","我的子键", "Left", 50 Debug.Print GetSetting(appname := "我的工程", section := "我的子键", key := "Left", default := "25") ③删除注册表中项目 DeleteSetting "我的工程", "我的子键" 3、GetAllSettings 从 Windows 注册表中返回应用程序项目的所有注册表项设置及其相应值 语法 GetAllSettings(appname, section) 参数 appname 必要。字符串表达式,应用程序或工程的名称。 编辑:黑鹰 [发送给好友] [打印本页] [关闭窗口] [返回顶部] 上一篇:VB4.0对注册表操作的命令 下一篇:在VB中调用API操作注册表 转载请注明来源:www.iyit.net 特别声明: 本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载,但请务必注明出处和原始作者。文章版权归文章原始作者所有。对于被本站转载文章的个人和网站,我们表示深深的谢意。如果本站转载的文章有版权问题请联系编辑人员,我们尽快予以更正。 |
| 相关文章 | ||||
| 友情链接 | ||||||
| 设置首 页 - 版权声明 - 广告服务 - 关于我们 - 联系我们 - 友情连接 |
| |||||||