vb.net中如何设置应用进行开机启动？

之前华仔建过一个视频网站，

搜罗了全网所有的视频资源，

分享给广大朋友观看。

奈何社会压力巨大，

华仔只得将网站关闭了。

不过，作为有心人，

我还是很乐意向大家分享你们想要的资源。

咳咳……

进入正题吧！

建视频网站不难，

只是由于华仔穷，

没有服务器，

所以不能向其他人民币玩家一样，

利用“宝塔”进行定时采集（咳咳，不懂宝塔可以留言咨询哟，我会给你科普的）

所以，作为开发入门的我，

想起了运用所拥有的知识，

开发了一个简单的倒计时采集软件，

非常方便！

这中间涉及到一个开机启动代码，

因为只要有了他，

就可以躺着采集了！

这里分享一下哈！以下是源码：

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
       Dim a As Microsoft.Win32.RegistryKey = My.Computer.Registry.CurrentUser.CreateSubKey("Software\Microsoft\Windows\CurrentVersion\Run")
       a.SetValue("定时采集.exe", Application.StartupPath & "\定时采集.exe")
       MsgBox("程序已实现了开机自动启动")
End Sub

其实也不是太难，

该代码就是在点击一个按钮后，

实现定时采集这个程序能够开机启动，

并且弹出告知的消息框，

希望大家互相学习，

有什么更好的实现方法欢迎留言哟！