【发布时间】:2017-04-13 01:25:38
【问题描述】:
所以基本上我在问如何检查网络浏览器的 URL 是否已更改(与上一个不同)。
谢谢。
【问题讨论】:
-
同一个网站换页或者换网站的区别?
-
很多方法,这里已经回答过无数次了。你有没有想过保留一个变量并检查它?
标签: vb.net url webbrowser-control
所以基本上我在问如何检查网络浏览器的 URL 是否已更改(与上一个不同)。
谢谢。
【问题讨论】:
标签: vb.net url webbrowser-control
你可以检查...
Sub webbrowser1_Complete(ByVal sender As Object, _
ByVal e As WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
//Webbrowser1.url property to get valu of url
End Sub
【讨论】:
好吧,从你的问题中我可以理解,这就是我要做的。
首先创建一个structurethis 将允许你存储你可能想要再次使用的数据。
下一步在这种情况下,创建一个 Function 并返回一个布尔值,用于检查 WebBrowser1 的当前 URL 是否与我们存储在结构中的 URL 相同。
一旦你这样做了,我将创建一个新的WebBrowser1 Event 在这种情况下WebBrowser1_DocumentCompleted 来触发函数来比较WebBrowser1 url 文本框和结构存储的字符串,当网页完全加载时。
Public Class Form1
Dim urlSettings As urlSetting
Structure urlSetting
Public url As String
End Structure
Private Function checkURL(url As String) As Boolean
Dim changed As Boolean = True
If Not urlSettings.url = url Then
changed = False
End If
Return changed
End Function
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
WebBrowser1.Navigate(New Uri(TextBox1.Text))
End Sub
Private Sub WebBrowser1_DocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
If Not checkURL(TextBox1.Text) Then
urlSettings.url = TextBox1.Text
MessageBox.Show("The URL has changed")
End If
End Sub
End Class
当然,您可以根据自己的需要进行修改,但这应该能让您顺利上路。 :)
MSDN 信息
结构:https://msdn.microsoft.com/en-us/library/4ft0z102.aspx
WebBrowser 控件:https://msdn.microsoft.com/en-us/library/system.windows.forms.webbrowser(v=vs.110).aspx
返回语句例如功能:https://msdn.microsoft.com/en-us/library/2e34641s.aspx
【讨论】: