Question

我正在使用vb.net列表框来显示多个图像。但它只显示表格上的第一张图片。

我的代码如下：

    Dim Pics As New List(Of PictureBox)
    For i As Integer = 0 To 6
        Pics.Add(New PictureBox)
        Pics(i).Image = Image.FromFile("D:\11.gif")
        Pics(i).Top = i * 300
        Pics(i).Left = i * 300
        Pics(i).Width = 1000
        Pics(i).Height = 1000
        Me.Controls.Add(Pics(i))
    Next

在我的代码中，我为所有6个图片框使用相同的图像进行测试。我的代码有什么问题吗？感谢。

Answer 1

正确更改top和left。试试这个

   Pics.Add(New PictureBox)
   Pics(i).Image = Image.FromFile("D:\11.gif")
   Pics(i).Top = 10
   Pics(i).Left = 100 + (i * 100)
   Pics(i).Width = 100
   Pics(i).Height = 1000
   Me.Controls.Add(Pics(i))

Answer 2

如果你想让它们在一行中设置Pics（i）.Top = 300“那么所有的图片都将水平”
“然后你会看到你的所有图片框”
或者将Pics（i）.Left = i * 150更改为Pics（i）.Left = 150以将它们全部垂直移动。

您需要更改其他设置的其他设置。

Dim Pics As New List(Of PictureBox)
    For i As Integer = 0 To 6
        Pics.Add(New PictureBox)
        Pics(i).Image = Image.FromFile("D:\11.gif")
        Pics(i).Top = 300
        Pics(i).Left = i * 150
        Pics(i).Width = 100
        Pics(i).Height = 100
        Me.Controls.Add(Pics(i))
    Next

vb.net表单显示多张图片，但只显示一张图片

2 个答案: