Как получить исходный код страницы (html) через WebView2?

Imports Microsoft.Web.WebView2.WinForms
Imports System.Runtime.CompilerServices
Imports System.Text.RegularExpressions
 
Public Module WebView2Extensions
 
    <Extension>
    Public Async Function GetHtmlAsync(control As WebView2) As Threading.Tasks.Task(Of String)
        Dim html As String = Await control.ExecuteScriptAsync("document.body.innerHTML")
        Return Regex.Unescape(html) 'декодирует escape-последовательности
    End Function
 
End Module
 
    'использование
    Private Async Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        MessageBox.Show(Await Me.WebView21.GetHtmlAsync())
    End Sub

     'в дополнение к коду модуля выше
    <Extension>
    Public Async Function GetDocumentAsync(control As WebView2) As Threading.Tasks.Task(Of HtmlAgilityPack.HtmlDocument)
        Dim doc As New HtmlAgilityPack.HtmlDocument()
        doc.LoadHtml(Await control.GetHtmlAsync())
        Return doc
    End Function
 
    'использование
    Private Async Sub Button2_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim doc = Await Me.WebView21.GetDocumentAsync()
 
        Dim divs = From elem In doc.DocumentNode.Descendants("div").Where(Function(x) x.Id.StartsWith("MyID")) 'допустим ищем divы с идентификаторами MyID0001,MyID9999 и т.п.
 
        For Each div In divs
            Debug.Print(div.InnerText) 'допустим нужно вывести содержимое
        Next
    End Sub