Problemi con WebBrowser

Un saluto a tutto il Forum, prima tramite WebBrowser riuscivo a visualizzare un sito,
purtroppo adesso mi segnala che internet explorer non è più supportato, per cui essendo
il comando WebBrowser basato su internet explorer, così mi ricordo, adesso non riesco più
a visualizzare la pagina web.
Chiedo se esiste una soluzione alternativa che consenta di non utilizzare explorer.

Posto il codice presente in unica form.

Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim indirizzo As String
        indirizzo = "https://www.lottomatica.it/lotterie/10elotto"
        WebBrowser1.Navigate(indirizzo)
    End Sub
    Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
        WebBrowser1.ScrollBarsEnabled = True
        WebBrowser1.Document.Window.ScrollTo(10, 200) 'Oriz - Vert
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Close()
    End Sub
End Class

Spero in un vostro aiuto in quanto penso possa essere un problema che col tempo sarà presente su altri siti.
Grazie a chi può aiutarmi,
Francesco

Non ho provato ma leggi questo

https://docs.microsoft.com/en-us/mic...arted/winforms

e prova tu webview2

Per fortuna la soluzione è semplice, basta dire al WebBrowser che deve simulare Microsoft Edge
Devi chiamare questa routine nel Form_Load della tua prima form

Public Sub InitEDGE()

        ' Computer\HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION
        Dim VersionCode = 12001 ' EDGE
        Dim Root As String = "HKEY_CURRENT_USER\"
        Dim AppName = My.Application.Info.AssemblyName
        Dim Key As String = "Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION"
        Dim CurrentSetting As String = CStr(Microsoft.Win32.Registry.CurrentUser.OpenSubKey(Key).GetValue(AppName & ".exe"))
        If CurrentSetting Is Nothing OrElse CInt(CurrentSetting) <> VersionCode Then
            Microsoft.Win32.Registry.SetValue(Root & Key, AppName & ".vshost.exe", VersionCode)
            Microsoft.Win32.Registry.SetValue(Root & Key, AppName & ".exe", VersionCode)
        End If

    End Sub

Buongiorno, ringrazio entrambi per le indicazioni date, AntonioG per il link utile che risulta molto istruttivo,
SirJo per il codice che funziona alla perfezione.
Francesco

A me il codice funziona solo se il sito non ha script particolari. Se apro il sito alla pagina home con il solo elenco dei contenuti funziona bene ma se da home cerco di aprire una pagina con degli applicativi iterativi animati il caricamento si blocca.

Debbo correggere quanto sopra, questa mattina anche altri avevano problemi con il sito da me provato. Oggi il sito è di nuovo operativo e passando a edge funziona regolarmente anche con gli script. Anch'io ho risolto un problema grazie ai consigli di Sir Jo.