可编程地在面板内创建图片框

时间:2014-02-10 19:03:01

标签: vb.net picturebox

嘿所有我创建了一个面板,我想在其中放置很多图片框。我将从“我的图片”文件夹中提取图片。我想要每行3个图片框。

我目前的代码是:

Dim newPictureBox As New PictureBox

newPictureBox.Image = Image.FromFile("C:\Users\Public\Pictures\Sample Pictures\Lighthouse.jpg")
newPictureBox.Visible = True
newPictureBox.Top = 0 'needed calulation here for each picturebox
newPictureBox.Left = 0 'needed calulation here for each picturebox
newPictureBox.Width = 536
newPictureBox.Height = 338
newPictureBox.BackgroundImageLayout = ImageLayout.Stretch
Panel1.Controls.Add(newPictureBox)

对于面板内的第一个图片框来说这很好,但是我将循环使用需要图片框的未知数量的图片。我知道下一个图片框的 Left 值应为545,但我不确定如何计算出来?然后是第二行,第三行等的 top 计算......

为每个图片框获取正确的 Top,Left 坐标的过程是什么,以便每行只有3个图片框?

0 个答案:

没有答案