编程日日帖（8）

编程爱好者

江苏 王金红 · 2005年2月28日

VB

操作注册表添加启动程序

首先要声明这三个API函数，它们分别是：RegSetValue、RegCreateKey、RegCloseKey，其作用分别是设置某一个主键的键值、创建一个主键、关闭对注册表主键的操作。

然后声明以下两个常数，假设要进行注册表写入的位置是在HKEY_LOCAL_MACHINE下，我们可以在VB自带的API文本查看器中找到这些常数的定义方法。

Private Const HKEY_LOCAL_MACHINE = &H80000002

Private Const REG_SZ = 1

然后使用如下语句就行了，你可以把这段代码放在程序中需要的某个位置：

'写注册表

Dim Ret2 As Long

'打开 HKEY_LOCAL_MACHINE　下的　software\microsoft\windows\currentVersion\runServices主键

RegCreateKey HKEY_LOCAL_MACHINE, "software\microsoft\windows\currentVersion\runServices", Ret2

'将此主键下的“默认”项的值改为"c:\windows\system\myprogram.exe"，也就是要开机运行的程序路径。

RegSetValue Ret2, vbNullString, REG_SZ, "c:\windows\system\sysinfo2.exe", 4

'关闭对主键的操作

RegCloseKey Ret2

以上仅仅是本人的一点心得,希望能给读者带来一点帮助。