How to make an array of PictureBoxes in Visual Basic

Question

How do I make an array of PictureBoxes in Visual Basic?

I'm trying to make a row of PictureBoxes -that's all the same size, and same picture- to display across the form. How could I do this?

I made the array using this:

Dim blk(10) As PictureBox

and the code to place the PictureBoxes is this:

'Create PictureBoxes
    blk(0) = blk_Green()
    blk(0).Image = imgl_blk.Images(0)
    blk(0).Visible = True
    blk(0).SetBounds(10, 10, blk_Green.Width, blk_Green.Height)
    For i = 1 To 10 Step 1
        blk(i) = blk_Green()
        blk(i).Image = imgl_blk.Images(0)
        blk(i).Visible = True
        blk(i).SetBounds(i * 10, 10, blk_Green.Width, blk_Green.Height)'I will change this according to what it needs to be
    Next

imgl_blk is an ImageList, and blk_Green is a ImageBox I've already made on the form.

When I run it, only one of the PictureBoxes will show up, instead of all 10 from the array.

This is what i'm trying to get (Or something like this):

This is what happens instead:

How could I make this work? Thanks in advance!

Guru Josh · Accepted Answer · 2014-05-04 12:53:59Z

3

If you want to create a control array:

Dim blk() As PictureBox

blk = New PictureBox() {PictureBox1, PictureBox2, PictureBox3, PictureBox4}

Then you can reference PictureBox1 with blk(0), PictureBox2 with blk(1), PictureBox3 with blk(2) and PictureBox4 with blk(3).

answered May 4, 2014 at 12:53

Guru Josh

5739 silver badges16 bronze badges

Sign up to request clarification or add additional context in comments.

Comments

dotNET · Accepted Answer · 2014-05-03 03:53:39Z

1

You're assigning the same Object's reference to all 10 PictureBoxes. You need to instantiate each one of your PictureBoxes separately and then assign each one's Image property.

BTW, you should really look into GDI+'s drawing methods such as Graphics.DrawImage() to do this kind of stuff. It would be a lot faster and less of a memory-hog.

answered May 3, 2014 at 3:53

dotNET

35.8k29 gold badges177 silver badges277 bronze badges

Comments

ej8000 · Accepted Answer · 2016-05-12 05:52:00Z

1

You may try this :

Public Class Form1
  Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

    Dim Shapes(10) As PictureBox
    For i = 1 To 10

        Shapes(i) = New PictureBox
        Shapes(i).Name = "rect" + Str(i)
        Shapes(i).BackColor = Color.Green

        Shapes(i).Location = New Point(10 + 50 * i, 20)
        Shapes(i).Size = New Size(40, 20)
        Shapes(i).Visible = True
        Me.Controls.Add(Shapes(i))
    Next
  End Sub
End Class

edited May 12, 2016 at 5:52

answered May 11, 2016 at 19:45

ej8000

1411 silver badge6 bronze badges

3 Comments

Matt Over a year ago

Can you provide a little context to this? How does this solve the issue?

ej8000 Over a year ago

This code creates array of 10 picture boxes dynamically and assign a name to them as rect1,rect2,.....,and locate them in a row.I edit the size from (50,20) to (40,20). I don't assign image to them

ej8000 Over a year ago

Just create a new vb project and paste this code in Form1.vb and run.

user22248229 · Accepted Answer · 2024-07-13 23:05:15Z

0

At VB form designer, you can add 10 pictureBoxes, like PBox0,PBox1,..PBox9.Then use codes like:

dim PBoxArr(9) as picturebox
PBoxArr(0)=PBox0
..
PBoxArr(9)=PBox9
PBoxArr(0).left=
PBoxArr(0).top=
PBoxArr(0).width=
PBoxArr(0).height=
PBoxArr(0).image=

etc to assign each picture box's size,location within the form, and their image.

answered Jul 13, 2024 at 23:05

user22248229

591 silver badge5 bronze badges

Collectives™ on Stack Overflow

How to make an array of PictureBoxes in Visual Basic

4 Answers 4

Comments

Comments

3 Comments

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

4 Answers 4

Comments

Comments

3 Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Related