网页素材: 导航菜单选项卡滑动门焦点图图片切换下拉菜单弹出层Tabs链接提示

您的当前位置: 源码爱好者 » 网页制作教程(编程教程) » VB技术教程

VB删除注册表指定键值和和参数值

  • 标签:注册表 删除键值  更新时间:2014-07-31
  • VB注册表相关操作模块,实现删除指定键的值和指定键值,可用来打开注册表的操作,配合其它模块,可实现注册表的编辑功能,代码如下:

    Public Function DeleteRegistryValueOrKey(ByVal hKey As RootKeyEnum, RegKeyName As String, _
       ValueName As String) As Boolean
    '//删除注册表值和键,如果成功返回True
       Dim lRetval As Long      '//打开和输出注册表键的返回值
       Dim lRegHWND As Long     '//打开注册表键的句柄
       Dim sREGSZData As String '//把获取值放入缓冲区
       Dim lSLength As Long     '//缓冲区大小.  改变缓冲区大小要在调用之后
       '//打开键
       lRetval = RegOpenKeyEx(hKey, RegKeyName, 0, KEY_ALL_ACCESS, lRegHWND)
       '//成功打开
       If lRetval = ERR_NONE Then
          '//删除指定值
          lRetval = RegDeleteValue(lRegHWND, ValueName)  '//如果已存在则先删除
          '//如出现错误则删除值并返回False
          If lRetval <> ERR_NONE Then Exit Function
          '//注意: 如果成功打开仅关闭注册表键
          lRetval = RegCloseKey(lRegHWND)
          '//如成功关闭则返回 True 或者其它错误
          If lRetval = ERR_NONE Then DeleteRegistryValueOrKey = True
       End If
    End Function
  • 已读: 次 收藏本文关闭本文打印本文复制链接
处理 SSI 文件时出错