vb写注册表内容

概述Private Sub Command1_Click()    Dim 注册表 As Object                          '定义对象变量    Set 注册表 = CreateObject("WScript.Shell.1")   '创建对象    '------------------ 写内容 ------------------    '写入文本    注册表.Re

Private Sub Command1_Click()
Dim 注册表 As Object '定义对象变量
Set 注册表 = CreateObject("WScript.Shell.1") '创建对象
'------------------ 写内容 ------------------
'写入文本
注册表.RegWrite "HKEY_LOCAL_MACHINE/SOFTWARE/你的项目/你的键值","写入的内容","REG_SZ"
'写入整数
注册表.RegWrite "HKEY_LOCAL_MACHINE/SOFTWARE/你的项目/你的键值WORD",100,"REG_DWORD"
'------------------ 读取内容 ------------------
Dim 读到的内容 As Variant
读到的内容 = 注册表.RegRead("HKEY_LOCAL_MACHINE/SOFTWARE/你的项目/你的键值")
If IsNull(读到的内容) = True Then
MsgBox "读不到注册表内容"
Exit Sub
End If
MsgBox "取出来的内容：" & 读到的内容
End Sub

总结

以上是内存溢出为你收集整理的vb写注册表内容全部内容，希望文章能够帮你解决vb写注册表内容所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。