从网页浏览器获取图片到图片框

Question

我在图片框中显示一些图片（多于一张）时遇到问题。

 <div id="salary_total" style="display: block;"><table style="border: 3px solid rgb(71, 5, 6); padding-right: 1px;" bgcolor="#ffffff" cellpadding="0" cellspacing="0"><tbody><tr><td><img src="./images/counter/b.gif"></td>
<td><img src="./images/counter/3.gif" border="0"></td>
<td><img src="./images/counter/3.gif" border="0"></td>
<td><img src="./images/counter/0.gif" border="0"></td>
<td><img src="./images/counter/8.gif" border="0"></td>
</tr></tbody></table> 

那些图片链接，显示为像 3308 这样的数字，并且每次页面加载时它都会改变。如何在图片框中显示这些图片（彼此相邻）。

Try
    Dim htmlDocument As HtmlDocument = Me.WebBrowser1.Document
    Dim htmlElementCollection As HtmlElementCollection = htmlDocument.Images
    For Each htmlElement As HtmlElement In htmlElementCollection
        Dim imgUrl As String = htmlElement.GetAttribute("src")
        If imgUrl.Contains("counter") Then
            Me.PictureBox1.ImageLocation = imgUrl.Substring(0, 41)
        End If
    Next

这个适用于第一张图片，我怎样才能再有 3 个图片框，并对其他 3 张图片做同样的事情？，就像 3.gif 将转到第一个图片框，依此类推？！

Answer 1

我想通了：这就是解决方案！谢谢

Try
            Dim htmlDocument As HtmlDocument = Me.WebBrowser1.Document
            Dim htmlElementCollection As HtmlElementCollection = htmlDocument.Images
            Dim ImagesFound As Integer = 0
            For Each htmlElement As HtmlElement In htmlElementCollection
                Dim imgUrl As String = htmlElement.GetAttribute("src")
                If imgUrl.Contains("counter") Then
                    ImagesFound+=1
                    Select Case ImagesFound
                         Case 1 
                              PictureBox1.ImageLocation = imgUrl
                              Label1.Text = PictureBox1.ImageLocation.ToString()
                         Case 2 
                              PictureBox2.ImageLocation = imgUrl
                              '... etc.
                    End Select

                End If
            Next
        Catch ex As Exception
        End Try

Answer 2

首先，您的 ImageLocation 将如下所示：

http://www.link.com./images/counter/8.gif

这可能不是您想要的。

其次，Shoban 说你应该使用常规文本和 CSS。他是对的。

第三，如果要在单个图片框中显示多个图像，则需要创建一个图像对象并将其他图像绘制到其中。有用于此目的的 VB.Net 函数以及本机 Windows API（CopyRect？）。

如果您愿意，可以使用多个图片框。