.NET 4.x Как спарсить код HTML? - Visual Basic .NET

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

Как спарсить код HTML? Например, чтоб с сайта ЧитайГород названия и авторы книг перемещались в listbox

Решение задачи: «.NET 4.x Как спарсить код HTML?»

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

                            Imports System.Net
Imports System.Text
Imports System.Web
Imports HtmlAgilityPack
Public Class ChitaiGorodParser
    Shared Iterator Function Parse(request As String) As IEnumerable(Of BookInfo)
        Using client As New WebClient
            client.Encoding = Encoding.Default
            client.QueryString.Add("q", HttpUtility.UrlEncode(request, Encoding.Default))
            Dim doc = New HtmlDocument
            Dim html = client.DownloadString("https://www.chitai-gorod.ru/search/result.php")
            doc.LoadHtml(html)
            Dim cards = doc.DocumentNode.SelectNodes("//div[@class='card__description']")
            If cards Is Nothing Then
                Yield New BookInfo()
                Return
            End If
            For Each card In cards
                Yield New BookInfo With {
                    .Author = card.SelectSingleNode("//*[contains(@class, 'card__author')]").InnerText,
                    .Title = card.SelectSingleNode("//*[contains(@class, 'card__title')]").InnerText
                }
            Next
        End Using
    End Function
End Class
                        