Как написать менеджер автозагрузки - Visual Basic .NET

Формулировка задачи:

Здравствуйте, не подскажите как сделать менеджер автозагрузки в VB.net? И если можно объясните подробно пожалуйста!

Решение задачи: «Как написать менеджер автозагрузки»

textual
                            Листинг программы 
                        

                            Imports System.IO
 
Public Class MainForm
    ''' <summary>
    ''' Создаёт ярлык для заданного приложения
    ''' </summary>
    ''' <param name="sourcePath">Путь к приложению</param>
    ''' <param name="destPath">Путь, по которому будет располгаться ярлык</param>
    ''' <param name="scutName">Имя будущего ярлыка</param>
    ''' <remarks>Тестировано только для приложений</remarks>
    Public Shared Sub CreateShortcut(sourcePath As String, destPath As String, scutName As String)
        Using writer As StreamWriter = New StreamWriter(Path.Combine(destPath, scutName & ".url"))
            writer.WriteLine("[InternetShortcut]")
            writer.WriteLine("URL=file:///" & sourcePath)
            writer.WriteLine("IconIndex=0")
            Dim icon = sourcePath.Replace("\\", "/")
            writer.WriteLine("IconFile=" & icon)
            writer.Flush()
        End Using
    End Sub
 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        CreateShortcut("C:\Program Files\7-Zip\7zFM.exe", _
            Environment.GetFolderPath(Environment.SpecialFolder.Startup), "7z")
    End Sub
End Class
                        