VB怎样读取注册表

来源：百度知道 编辑：UC知道 时间：2024/07/04 11:55:16
在注册表这个位置HKEY_CURRENT_USER\Software\qswsqsw

有个字符串值OK，如何用VB读取它的值？？

10 API 搞定注册表精解示例:
http://www.vbgood.com/viewthread.php?tid=68106&extra=page%3D1&page=1

添加一个按钮，写入以下代码

Private Const HKEY_CURRENT_USER = &H80000001
Private Const HKEY_LOCAL_MACHINE = &H80000002
Const ERROR_SUCCESS = 0&
Private Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpenKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Private Declare Function RegQueryValue Lib "advapi32.dll" Alias "RegQueryValueA" (ByVal hKey As Long, ByVal lpSubKey As String, ByVal lpValue As String, lpcbValue As Long) As Long
Private Declare Function RegQueryValueEx Lib "advapi32.dll" Alias "RegQueryValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, lpType As Long, lpData As Any, lpcbData As Long) As Long