(50分)VB怎样写入注册表

来源：百度知道 编辑：UC知道 时间：2024/05/03 04:02:27
不是用SaveSetting
我只要读、写、删除的代码,类型均为REG_SZ

假如我的窗体上有txtReg(TextBox),cmdDuQi(CommandButton),cmdDelete(CommandButton),cmdXieRu(CommandButton)
我想按cmdDuQi就读取
HKEY_CURRENT_USER/Software/hjkcai/21d/Main/中的键值Card
按cmdDelect就删除
HKEY_CURRENT_USER/Software/hjkcai/21d/Main/中的键值Card
按cmdXieRu就在
HKEY_CURRENT_USER/Software/hjkcai/21d/Main/Card中写入123(Card是一个键值)

怎么办????????????????????

如果有VB.Net的代码就写VB.Net的,不然就VB6的
一楼，类型不匹配
不是写启动项
写入的内容是txtReg的内容

用WSH（Windows Script Host）更容易掌握

Set Reg = CreateObject("Wscript.Shell")

Reg.RegWrite "要写入的值的名称","值"
Reg.RegRead "要读取的值的名称"
Reg.RegDelete "要删除的键名或值名"

比如：读取你的键值
Set Reg = CreateObject("Wscript.Shell")
strS=Reg.RegRead "HKEY_CURRENT_USER\Software\hjkcai\21d\Main\Card"
msgbox strS

注意：WSH认为，结尾带有“\”的是键名，否则是值名

'不知道对不对
Private Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpenKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Private Declare Function RegSetValue Lib "advapi32.dll" Alias "RegSetValueA" (ByVal hKey As Long, ByVal lpSubKey As String, ByVal&nbs