visual|window|注册表Windows98系统注册表中包含关于系统配置及运行的重要信息。本文以修改KEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run子键分支中的键值信息为例,介绍如何在Visual Basic中,利用Win32 API函数修改注册表。
声明Win32 API函数’该函数用于打开系统注册表中已存在的键。
函数的返回值:键打开成功返回0,否则返回非0,
phkResult被设置为该键的句柄。
Declare Function RegSetValueEx Lib “advapi32”
Alias “RegSetValueExA” (ByVal hkey As
Long,ByVal lpszValueName As String,ByVal
dwReserved As Long,ByVal fdwType As Long,
lpbData As Any,ByVal cbData As Long) As Long
’该函数用于向系统注册表中指定的键添加键名和键值。
函数的返回值: 添加键名、键值成功返回0,否则返回非0。
Declare Function RegCloseKey Lib “advapi32”
Alias “RegCloseKey” (ByVal hkey As Long) As Long
’该函数用于关闭系统注册表中打开的键。
函数的返回值:键关闭成功返回0,否则返回非0。
’StrConv是Visual Basic提供的函数,
返回按指定类型转换的Variant(String)。
’vbFromUicode是Visual Basic的系统常数。在上面程序中,StrConv(strData,vbFromUnicode)的作用是:根据系统的默认码将字符串转换成Unicode。
用Visual Basic修改Windows98注册表
80酷酷网 80kuku.com