用VB+ACCESS做的管理系统如何开机后自动运行

来源：百度知道 编辑：UC知道 时间：2024/06/06 16:06:22
知道是需要修改注册表,在VB中应如何修改注册表呢
代码我在网上搜了许多,但不知道怎么用
我想让我的系统一开机就运行登录窗口,应该在哪添加代码呢
可以的话,顺便把修改注册表的详细代码给我说说吧
先谢啦

VB声明 Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpenKeyA"
(ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
参数类型及说明:
hKey:Key Handle
lpSubKey:SubKey名称或路径
phkResult:若RegOpenKey执行成功，则这一参数返回Subkey的hKey.

返回值: =0,表示成功；≠0,表示失败。[注意这一点与别的API函数不太一样]

调用例：
Dim ret As Long, hKey As Long, hKey2 As Long
'取得"HKEY_LOCAL_MACHINE"底下的"SOFTWARE\Microsoft"这个SubKey Handle.
ret = RegOpenKey(HKEY_LOCAL_MACHINE, "SOFTWARE\Microsoft", hKey)
If ret = 0 Then 'If Success
MsgBox "HKLM\SOFTWARE\Microsoft = " & hKey
End If

'继续以刚才所取得的"HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft"hKey为参数，再取得它的'SubKey"Windows\CurrentVersion"的handle。

ret = RegOpenKey(hKey, "Windows\CurrentVersion", hKey2)
If ret = 0 Then
MsgBox "HKLM\SOFTWARE