Estoy haciendo como proyecto de fin de curso un gestor de videos de YouTube. Tratando el tema de la descarga no me oriento muy bien. He encontrado un par de códigos por internet, pero no me funcionan y además no vienen nada comentados.

Por ahora lo único que tengo es el inicio, pero no se como seguir. Si alguien me diese alguna indicación sería de gran utilidad.

  

   Public Sub obtenerInfo(ByVal link As String)
        Dim peticion As HttpWebRequest
        Dim respuesta As HttpWebResponse
        Dim source As String
        If link.Contains("youtube.com") Then
            Try
                'Se realiza una peticion a la URL que nosotros queremos descargar
                peticion = DirectCast(HttpWebRequest.Create(link), HttpWebRequest)
                'Recibimos la respuesta de esa URL
                respuesta = DirectCast(peticion.GetResponse, HttpWebResponse)
                'Leemos la respuesta y obtenemos toda la información de esa página en una string
                source = New StreamReader(respuesta.GetResponseStream, System.Text.Encoding.Default).ReadToEnd
                'Hasta ahora solo tenemos toda la información que contiene el link
            Catch ex As Exception
                MessageBox.Show("Ha ocurrido un error inesperado", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
            End Try
        End If
    End Sub

Gracias.