RegSetValueEx函数用法?

Public Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpenKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Public Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long
Public Declare Function RegSetValueEx Lib "advapi32.dll" Alias "RegSetValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal reserved As Long, ByVal dwType As Long, lpData As Any, ByVal cbData As Long) As Long

Public Const HKEY_USERS = &H80000003

Public Const REG_DWORD = 4 ' 32-bit number

然后就可以在窗体的代码中写
说明：Fh是随便定的变量接一下函数返回值
Fh = RegOpenKey(HKEY_USERS, ".DEFAULT\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoNetHood", Bjb)'Bjb是打开注册表的句柄
Fh = RegSetValueEx(Bjb, "这个值你没给", 0, REG_DWORD , 1, 4)
Fh = RegCloseKey(Bjb)