VB读取注册表字符串值

来源：百度知道 编辑：UC知道 时间：2024/05/14 18:03:31
怎样读取

HKEY_CLASSES_ROOT\CLSID\{4B34393B-7422-4EB6-8EAF-2AE0DC2077C1}\LocalServer32

下的字符串值

Private Sub Command4_Click()
Dim w As Object
Set w = CreateObject("wscript.shell")
a = w.regread("HKEY_CLASSES_ROOT\CLSID\{4B34393B-7422-4EB6-8EAF-2AE0DC2077C1}\LocalServer32\")
MsgBox a
End Sub