VB.net 2010 视频教程 VB.net 2010 视频教程 VB.net 2010 视频教程
  • vb教程之在VB编程中使用系统“注册表” (加入

  • 2017-09-21 16:19 来源:未知
 文/朱文刚

  用VB编程,在打开一个主键时,常?;嵊肦egOpenKey,比如要锁定注册表就写成:

  Private Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpen

  KeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkRes 
ult As Long) As Long

  ...... 

  Dim Hkey,r As Long

  r=RegOpenKey(HKCU,LockREG,Hkey)

  ........

  但是,有没有想过有的用户注册表中没有System主键,就无法打开这个子键,也就无法实现这个功能。解决的办法是用另一个API,RegCreateKey这个API有主键则打开,如果没有就自动创建并打开。所以上面的代码应写成

  Private Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long

  ......

  r=RegCreateKey(HKCU,LockREG,Hkey)

  ......

  这样就不会出错了。放弃RegOpenKey吧,把用RegOpenKey的地方全部改成RegCreateKey,因为参数相同,所以不会出错。这样你的软件才能在所有用户的机器上通行无阻。(文中的HKCU = HKEY_CURRENT_USER;LockREG = Software\Microsoft\Windows\CurrentVerson\Policies\System)
相关教程
  • 【砥砺奋进的5年】空气质量优良 "南宁蓝"常驻绿城 2019-02-17
  • 机关党建工作巡礼——广东“走前头作表率” 2019-02-17
  • 为什么说一直辛苦劳作的农民没有富起来?而不说一直勤劳的农民没有富起来? 2019-02-17
  • 中欧美六国商会签约 国际战略合作在石达成 2019-02-17
  • 【专题】走龙江丝路 向北看发展 华南城 全国重点网媒龙江集中采访活动 2019-02-16
  • 彩民复式追加投注 斩获体彩大乐透1425万 2019-02-16
  • 多彩课堂熔铸红色魂——甘祖昌干部学院教学素描 2019-02-16
  • 张佳宁杂志玩转新娘风 甜系女生展俏皮魅力 2019-02-15
  • 中央调剂制度促进养老保险制度可持续发展 2019-02-15
  • 西安高科工程技术学校——陕西省政府直属中等职业院校西安高科工程技术学校2018招生简章-陕西教育新闻 2019-02-14
  • 旅游低价团暗藏玄机 治理需保持高压态势--旅游频道 2019-02-14
  • 【高清】傈僳族乡村女教师熊文碧:背着娃娃教书 2019-02-13
  • QS世界大学排名发布:中国11所大学进百强,清华排名创历史 2019-02-13
  • 辽宁贯彻十九大精神:领导沉下去 群众用心学 2019-02-13
  • 多部门三令五申禁网售彩票,世界杯竞猜APP上仍热卖 2019-02-12
  • 413| 671| 732| 944| 368| 129| 889| 685| 32| 848|