加载 Google 地图时 VB.NET 中的网络浏览器出现问题

编程


你好!
祝大家美好的一天。

我正在尝试使用 Visual Studio 2017 中的 VB.Net 中的 WebBrowser 控件打开谷歌地图。

这是简单的代码。

Private Sub txtSearc_KeyDown(sender As Object, e As KeyEventArgs) Handles txtSearch.KeyDown
        If e.KeyCode = Keys.Enter Then
            Try
                Dim queryaddress As New System.Text.StringBuilder
                queryaddress.Append("https://www.google.com/maps?q=")
                If txtSearch.Text <> "" Then
                    queryaddress.Append(txtSearch.Text + "," & "+")
                End If

                browser_.ScriptErrorsSuppressed = True
                browser_.Navigate(queryaddress.ToString())

            Catch ex As Exception
                Exit Sub
            End Try
        End If
End Sub

但是当我加载位置时,WebBrowser 控件会显示页面几秒钟,然后位置消失,控件会显示错误“更新浏览器以使用 Google 地图”

如果有人可以帮助我在这里犯下的错误之王,我将不胜感激。

感谢和问候:
穆罕默德·阿西姆·莫卧儿

我尝试过的:

Private Sub txtSearc_KeyDown(sender As Object, e As KeyEventArgs) Handles txtSearch.KeyDown
        If e.KeyCode = Keys.Enter Then
            Try
                Dim queryaddress As New System.Text.StringBuilder
                queryaddress.Append("https://www.google.com/maps?q=")
                If txtSearch.Text <> "" Then
                    queryaddress.Append(txtSearch.Text + "," & "+")
                End If

                browser_.ScriptErrorsSuppressed = True
                browser_.Navigate(queryaddress.ToString())

            Catch ex As Exception
                Exit Sub
            End Try
        End If
    End Sub

解决方案1

WebBrowser 控件将早已失效的 Internet Explorer 实例嵌入您的应用程序中。

更糟糕的是,除非您修改运行应用程序的每台计算机上的注册表,否则该实例将陷入 IE7 渲染模式,这意味着几乎所有现代网站都将无法加载。

您需要更新代码以使用现代浏览器控件 – 例如, 网页视图2[^] 或者 头孢沙普[^]。

コメント

タイトルとURLをコピーしました