如何加入自启动?

问题描述：

我现在在用VB写程序，我想让它自己加入自启动，也就是一开机就自己启动，那应该怎么怎么写？那如果要取消自启动呢？给代码
分数不是问题

问题解答：

导入注册表,实现开机自动运行
Set w = CreateObject("wscript.shell")
w.regwrite "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName, App.Path & "\" & App.EXEName & ".exe"

取消自动运行
Set w = CreateObject("wscript.shell")
w.regdelete "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName

找到注册表的如下值：HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run 在右边新建个字符串值，名称可用你的VB程序的名字，数值数据就写你VB程序的路径。