以下是引用裴保民在2017/11/19 21:20:00的发言:按操作无法自动启动程序
[此贴子已经被作者于2017/11/19 21:20:44编辑过]
这种问题,百度吧。
https://www.baidu.com/baidu?wd=%E8%87%AA%E5%90%AF%E5%8A%A8
你也可以在AfterOpenProject写代码,如
Dim starupPath = ApplicationPath & "\abc.exe"
Dim loca = Microsoft.Win32.Registry.LocalMachine
Dim run = loca.CreateSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run")
'run.SetValue("我的项目", False) '取消开机运行
run.SetValue("我的项目", starupPath) '设置开机运行
loca.Close()