VB6.0下面对注册表进行写入、读取操作

昨天应经理要求写一个关于注册表的小程序,由于博主不怎么会编程,于是去百度上找教程,发现关于修改注册表的VB代码基本上都是一大串一大串的,结果在某站上找的了关于VB修改注册表的简单方法,非常实用。

VB6.0下面对注册表进行写入、读取操作 - 1
Visual Basic 6.0界面

 

注册表读取

Dim wss As Variant '定义调用脚本所需的变量wss
Set wss = CreateObject("WScript.Shell") '调用WS
zcb = wss.RegRead("HKEY_CURRENT_CONFIG\Software\123") '读取注册表H.._C..._C...\S...\下面的123这个项的值
Text1.Text = zcb '把123这个值输出到文本框

 

注册表写入

Dim wss As Variant '定义调用脚本所需的变量wss
Set wss = CreateObject("WScript.Shell") '调用WS
zcb = wss.Regwrite("HKEY_CURRENT_CONFIG\Software\1234", "123", "REG_SZ") '把注册表H.._C..._C...\S...\下面的1234这个项修改成123并设置为字符型数据

是不是非常简单,博主实际测试过,有效!

Leave a Reply

Your email address will not be published. Required fields are marked *