當前位置: 首頁>>代碼示例>>VB.NET>>正文


VB.NET WebBrowserNavigatingEventArgs類代碼示例

本文整理匯總了VB.NET中System.Windows.Forms.WebBrowserNavigatingEventArgs的典型用法代碼示例。如果您正苦於以下問題:VB.NET WebBrowserNavigatingEventArgs類的具體用法?VB.NET WebBrowserNavigatingEventArgs怎麽用?VB.NET WebBrowserNavigatingEventArgs使用的例子?那麽, 這裏精選的類代碼示例或許可以為您提供幫助。


在下文中一共展示了WebBrowserNavigatingEventArgs類的1個代碼示例,這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚,您的評價將有助於係統推薦出更棒的VB.NET代碼示例。

示例1: MsgBox

Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs) _
    Handles Me.Load

    webBrowser1.DocumentText = _
        "<html><body>Please enter your name:<br/>" & _
        "<input type='text' name='userName'/><br/>" & _
        "<a href='http://www.microsoft.com'>continue</a>" & _
        "</body></html>"

End Sub

Private Sub webBrowser1_Navigating( _
    ByVal sender As Object, ByVal e As WebBrowserNavigatingEventArgs) _
    Handles webBrowser1.Navigating

    Dim document As System.Windows.Forms.HtmlDocument = _
        webBrowser1.Document
    If document IsNot Nothing And _
        document.All("userName") IsNot Nothing And _
        String.IsNullOrEmpty( _
        document.All("userName").GetAttribute("value")) Then

        e.Cancel = True
        MsgBox("You must enter your name before you can navigate to " & _
            e.Url.ToString())
    End If

End Sub
開發者ID:VB.NET開發者,項目名稱:System.Windows.Forms,代碼行數:28,代碼來源:WebBrowserNavigatingEventArgs


注:本文中的System.Windows.Forms.WebBrowserNavigatingEventArgs類示例由純淨天空整理自Github/MSDocs等開源代碼及文檔管理平台,相關代碼片段篩選自各路編程大神貢獻的開源項目,源碼版權歸原作者所有,傳播和使用請參考對應項目的License;未經允許,請勿轉載。