VB.net web浏览器中的奇怪错误
我正在vb.net上创建一个应用程序,其中我正在使用web浏览器。代码运行良好,但每次打开应用程序时都会弹出一些窗口 这是弹出窗口: 如何删除此脚本错误。下面是我的代码:VB.net web浏览器中的奇怪错误,vb.net,Vb.net,我正在vb.net上创建一个应用程序,其中我正在使用web浏览器。代码运行良好,但每次打开应用程序时都会弹出一些窗口 这是弹出窗口: 如何删除此脚本错误。下面是我的代码: Imports System.Text Public Class Form4 Private Sub btnMapIt_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnMapIt.Click
Imports System.Text
Public Class Form4
Private Sub btnMapIt_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnMapIt.Click
Try
Dim street As String = String.Empty
Dim city As String = String.Empty
Dim state As String = String.Empty
Dim zip As String = String.Empty
Dim queryAddress As New StringBuilder()
queryAddress.Append("http://maps.google.com/maps?q=")
queryAddress.Append(TextBox1.Text)
webBrowser1.Navigate(queryAddress.ToString())
Catch ex As Exception
MessageBox.Show(ex.Message.ToString(), "Unable to Retrieve Map")
End Try
End Sub
Private Sub Panel1_Paint(ByVal sender As System.Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Panel1.Paint
Try
TextBox1.Text = Form10.TextBox6.Text
'txtStreet.Text = TextBox1.Text
Catch ex As Exception
MsgBox("Welcome to Google Maps", MsgBoxStyle.Information)
End Try
End Sub
End Class
在FormLoad事件中尝试此操作,查看:
谢谢我不知道有这样的事。
webBrowser.ScriptErrorsSuppressed = true;