用VB操作注册表(六)

S Q R E G . C O M	手机短信	欢迎投稿	加入收藏	设为首页

:注册表结构　?注册表使用　0注册表应用　1注册表软件介绍　<注册表软件下载　&我谈注册表

注册表修改→		◆网络◆限制◆操作◆桌面◆性能◆图标◆安全◆目录◆提示◆分菜单◆主菜单◆左右键菜单◆

短
信
传
情

铃声传情	很爱很爱你(刘若英)　沧海一声笑(许冠杰)　情有独钟(陈晓东)　童年(罗大佑)　世界末日
图片达意
更多专题	诺基亚 \| 西门子 \| 爱立信 \| 摩托罗拉 \| 阿尔卡特 \| 三星 \| 言语传情 \| 短信笑话 \|

　你现在所在的位置：首页 >> 注册表应用 >> 用VB操作注册表(六)

0用VB操作注册表(一)	0用VB操作注册表(二)	0用VB操作注册表(三)	0用VB操作注册表(四)	0用VB操作注册表(五)
0用VB操作注册表(六)	0用VB操作注册表(七)	0操作所用函数收录	1作者的话

用VB操作注册表(六)
梦里水乡

登录数据库Registry的Value的存取--删除某Key的Value

这个功能很容易实现。主要是要调用相应的API函数--RegDeleteValue,以下是它的一些描述：
VB声明
Declare Function RegDeleteValue Lib "advapi32.dll" Alias "RegDeleteValueA" (ByVal hKey As Long, ByVal lpValueName As String) As Long
参数：
hKey:Key Handle
lpValueName: Value名称，如果想删除默认值的话，传入""[空字符串]即可。

返回值: =0,表示成功；≠0,表示失败。

函数调用例：
'我们假设在HKEY_CURRENT_USER\Software\SetValue有：
'预设值--VB操作注册表
'str1--我爱我的祖国
'我们要删除这两个Value
ret = RegOpenKey(HKEY_CURRENT_USER, "Software\SetValue", hKey)
If ret = 0 Then
RegDeleteValue hKey, "Str1"
MsgBox "已删除HKCU\Software\SetValueSubKeyStr1Value"
RegDeleteValue hKey, ""
MsgBox "已删除HKCU\Software\SetValueSubKey‘预设值’"
End If