VS 2010 remove from registry

Public Shared Sub AddToStartup()
        Dim regkey As RegistryKey
        regkey = Registry.CurrentUser.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True)
        regkey.SetValue("ApplicationName", Application.ExecutablePath, RegistryValueKind.String)
        regkey.Close()
    End Sub