投稿者 YAS  (社会人) 投稿日時 2011/1/22 22:34:16
正規表現ではなく,DOMを検索する方がよいと思います。

Public Class Form1

    Friend WithEvents Webbrowser1 As New WebBrowser

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.Webbrowser1.Dock = DockStyle.Fill
        Me.Controls.Add(Me.Webbrowser1)
        Me.Webbrowser1.GoHome()
    End Sub

    Private Sub Webbrowser1_DocumentCompleted(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles Webbrowser1.DocumentCompleted
        Dim Body As HtmlElement = Me.Webbrowser1.Document.Body
        Dim Images As HtmlElementCollection = Body.GetElementsByTagName("img")
        For Each Img As HtmlElement In Images
            Debug.Print(Img.GetAttribute("src"))
        Next
    End Sub

End Class