VB 如何写入注册表

来源：百度知道 编辑：UC知道 时间：2024/05/03 07:12:17
比如我现在单击Command1那么就进行如下操作
在HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon建立一个名位“DefaultUserName”的字符字串，键值为Administrator
该怎么做呢？？？望高手作答，请勿粘贴，谢谢！
请将API和过程都写出来~~~谢谢哦！！！！

On Error Resume Next '容错句
Dim wsh
Set wsh = CreateObject("Wscript.Shell") '利用wshshell写注册表

wsh.Regwrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\ABCDEFG\DisplayIcon","显示图标","REG_SZ"
wsh.Regwrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\ABCDEFG\DisplayName","显示名称","REG_SZ"
wsh.Regwrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\ABCDEFG\DisplayVersion","显示版本","REG_SZ"
wsh.Regwrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\ABCDEFG\Publisher","发布者","REG_SZ"
wsh.Regwrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\ABCDEFG