The new version works fine.
To play with her.

this for insert text code to the page.
Code:
Function NavigateToString(htmlContent As String)
    Dim r As Long
    r = DispCallByVtbl(webviewWindow, 3 + 3, StrPtr(htmlContent))
End Function
but i don't know how to do this
Code:
        virtual HRESULT STDMETHODCALLTYPE ExecuteScript( 
            /* [in] */ LPCWSTR javaScript,
            /* [in] */ IWebView2ExecuteScriptCompletedHandler *handler) = 0;