vb.net：約キャッチウェブブラウザ画像リンク

Question

キャッチウェブブラウザ画像リンクについて
私のウェブブラウザには1つの画像があります。
この画像リンクをTextBoxにキャッチするにはどうすればよいですか？
私は、これは何が必要だと思うwenBrowser1プロパティに

Public Class Form1 

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
     Dim PageElements As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("img") 
     For Each CurElement As HtmlElement In PageElements 
      TextBox1.Text = TextBox1.Text & CurElement.GetAttribute("src") & Environment.NewLine 
     Next 
    End Sub 

    Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted 

    End Sub 

    Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged 

    End Sub 
End Class 

Answer 1

がWebBrowser1_DocumentCompleted

Answer 2

をウェブサイトのリンクを設定しますか？

Webbrowserコントロール、2 buttonコントロール、およびtextboxコントロールを追加し、テキストボックスプロパティをmultilineに設定します。

ボタン1を最初にクリックすると、あなたのウェブサイトの一部に移動します。

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click 
     WebBrowser1.Navigate("http://www.microsoft.com") 
End Sub 

そして、あなたがそのWebリンク内のすべての画像をbutton2をクリックすると、あなたのテキストボックスここ

Private Sub Button2_Click(sender As Object, e As System.EventArgs) Handles Button2.Click 
    Dim PageElements As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("img") 
    For Each CurElement As HtmlElement In PageElements 
     TextBox1.Text = TextBox1.Text & CurElement.GetAttribute("src") & Environment.NewLine 
    Next 
End Sub 

に追加されますが出力されます。