用手动导入注册表的方式解决了，如何将该REG文件直接写入到VB6中呢？
也就是说，如何在VB6中添加某个程序的注册表？

vb6.0本来就可以操作注册表， 搜一下getsetting、savesetting的用法。相关的还有getallsettings 和deletesetting的用法。
实在不行就用API吧

[ 本帖最后由 lianyicq 于 2014-12-30 13:48 编辑 ]

不是很懂，最好能给个实例源码。
比如就这个：
路径：HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Internet Explorer\MAIN\FeatureControl\FEATURE_BROWSER_EMULATION

程序名: 001.exe

键值：0x270F

那如何用VB添加进去呢？

[ 本帖最后由 klsw 于 2014-12-30 13:49 编辑 ]

还是给你个链接,用wscript.shell对象的方法,可能比较容易
http://blog.

Dim wss As Object, msw As Object
    Set wss = CreateObject("WScript.Shell")
   
    codereg = "0x270F"

   wss.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Internet Explorer\MAIN\FeatureControl\FEATURE_BROWSER_EMULATION\001.exe", codereg, "REG_SZ"

[ 本帖最后由 lianyicq 于 2014-12-30 14:02 编辑 ]

感谢回复，不过，是REG_DWORD值，不是REG_SZ。
换成REG_DWORD后，提示“类型不匹配”

[ 本帖最后由 klsw 于 2014-12-30 14:24 编辑 ]

我举的例没定义codereg数据类型,实际赋值是字符串型,和reg_sz,匹配.

照你的引用，实际看了也没添加任何键值的，不知何故？

以下图片是举例代码运行之前和运行之后的注册表图片[attach]78573[/attach][attach]78574[/attach]看看system32下有没有wshom.ocx



[ 本帖最后由 lianyicq 于 2014-12-30 14:43 编辑 ]

换成"REG_DWORD"能成吗？不换也不成呀，系统也有WSHOM.OCX

[ 本帖最后由 klsw 于 2014-12-30 14:59 编辑 ]

换为REG_DWORD就出现你所说的类型不匹配.就是codereg的数据类型问题.如果改为codereg=@H270F,就可换为REG_DWORD,但运行后001.exe的值为270f