请问如何用VB对注册表里的DWORD键赋1的值?

Question

RegSetValueEx hKey, "NoAddPrinter", 0, REG_DWORD, lngValue, 4
这句是设d_word性键值为0的
我找不到设它为1的语句了
谁能帮偶啊

Answer 1

用对象简单啊，我以前也用api，现在改用这个了
    Dim Reg As Object
    Set Reg = CreateObject("Wscript.Shell")     Dim RegHis As Double
   Reg.RegWrite "HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\Url History\DaysToKeep", 1, "REG_DWORD"
//用这个操作注册表可以偷很多懒哦

Answer 2

用对象那些注册表监控会报警呀
用API就不会.
我找的资料都不全,没有介绍怎么为DOWRD类型键值赋1值的
哪位大侠,发条例子呀

Answer 3

RegSetValueEx
The RegSetValueEx function sets the data and type of a specified value under a registry key. LONG RegSetValueEx(
  HKEY hKey,           // handle to key to set value for
  LPCTSTR lpValueName, // name of the value to set
  DWORD Reserved,      // reserved
  DWORD dwType,        // flag for value type
  CONST BYTE *lpData,  // address of value data
  DWORD cbData         // size of value data
);