作者：绿色风
分类：
时间：2022-08-17
浏览：171
楼主
kevinchengcw |
Q: 如何用vba代码向注册表中写入REG_MULTI_SZ类型键值？
A: 代码如下：
- Sub test()
- Dim RegPath$
- RegPath = "HKCU\SOFTWARE" '设定注册表路径
- '在注册表HKCU\SOFTWARE下添加一个test（reg_multi_sz类型），值赋值为111和222和333
- Shell Environ("comspec") & " /c reg add " & RegPath & " /v test /t reg_multi_sz /s , /d 111,222,333 /f"
- End Sub
REG命令参数说明：
Reg Add 命令语法：
REG ADD KeyName [/v ValueName | /ve] [/t Type] [/s Separator] [/d Data] [/f]
| 参数 | 说明 | | KeyName | [\\Machine\]FullKey
远程机器的机器名 - 忽略默认到当前机器。
远程机器上只有 HKLM 和 HKU。
FullKey ROOTKEY\SubKey
ROOTKEY [ HKLM | HKCU | HKCR | HKU | HKCC ]
SubKey 所选 ROOTKEY 下注册表项的完整名
| | /v | 所选项之下要添加的值名 | | /ve | 为注册表项添加空白值名<无名称> | | /t | RegKey 数据类型
[ REG_SZ | REG_MULTI_SZ | REG_DWORD_BIG_ENDIAN |
REG_DWORD | REG_BINARY | REG_DWORD_LITTLE_ENDIAN |
REG_NONE | REG_EXPAND_SZ ]
如果忽略，则采用 REG_SZ | | /s | 指定一个在 REG_MULTI_SZ 数据字符串中
用作分隔符的字符
如果忽略，则将 "\0" 用作分隔符
| | /d | 要分配给添加的注册表 ValueName 的数据 | | /f | 不用提示就强行改写现有注册表项 |
免责声明 有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，
经与ExcelTip.Net站长Apolloh商议并征得其同意，
现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，
供有需要的人士查询使用，也慰缅曾经的论坛时代。
所示各个帖子的原作者如对版权有异议，
可与本人沟通提出，或于本站点留言，我们会尽快处理。
在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一 |