VB能否实现勾选CHECK 控件程序下次自动运行

可以，如果设置多的话可以用ini文件保存，启动的时候来读取配置
如果就一个的话，可以直接操作注册表。。。没有vb的源码 只有delphi的
希望对你有帮助
if isAutoRun then
begin
common.WriteRegKey(HKEY_LOCAL_MACHINE,
'\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\',
'DAInterface',//DAInterface为自己的程序
Application.ExeName
);
end
else
common.DeleteRegItem(HKEY_LOCAL_MACHINE,
'\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\',
'DAInterface');

一、通过注册表；
二、通过启动文件夹；
三、通过系统服务；
四、其他方式。

比如：
第一种方式：
Public Sub SetAutoRun(ByVal Autorun As Boolean)
Dim KeyId As Long
Dim MyexePath As String
Dim regkey As String
MyexePath = App.Path & "" & App.EXEName & ".exe" 获取程序位置
regkey = "SoftwareMicrosoftWindowsCurrentVersionRun" 键值位置变量
Call RegCreateKey(HKEY_LOCAL_MACHINE, regkey, KeyId) 建立
If Autorun Then
RegSetValueEx KeyId, "MySoftware", 0&, REG_SZ, ByVal MyexePath, LenB(MyexePath)
Else
RegDeleteValue KeyId, "MySoftware"
End If
RegCloseKey KeyId
End Sub

第二种方式：
利用Vb5stkit.dll里面的函数
Private Sub CmdAddStartup_Click() 在开始菜单的启动程序组下创建记事本的快捷方式
Call OSfCreateShellLink("启动", "记事本", GetWindowsPath & "Notepad.exe", "")
End Sub

参考：
VB的开机自动运行程序的代码
http://www.2cto.com/kf/201103/86377.html

参考资料：http://www.2cto.com/kf/201103/86377.html

本回答被提问者采纳