Solved

how to create an object array with a child object.

Posted on 2009-04-14
4
181 Views
Last Modified: 2012-05-06
Hi All!

Ok.. I have a small loop that creates a new PANEL, After each panel is created I also am creating a new LABEL within that panel.. as its child.

The problem is I only get one LABEL in the first PANEL?

Im stumped..
Thanks in Advance..

Code is below..
Dim panelx(10) As Panel
        Dim labelx(10) As Label
 
        CNT = 0
        Dim looper
        For looper = 1 To 9
 
            panelx(looper) = New Panel
            labelx(looper) = New Label
 
            panelx(looper).BorderStyle = BorderStyle.FixedSingle
            panelx(looper).BackColor = Color.Pink
            panelx(looper).Width = 123 * looper
            panelx(looper).Height = 123
            panelx(looper).Location = New Point(10, 10)
 
 
            Me.Controls.Add(panelx(looper))
 
 
            ToolTip1.SetToolTip(panelx(looper), looper)
            ToolTip1.SetToolTip(labelx(looper), ".." & looper)
 
            labelx(looper).Location = New Point(-1, -2)
            labelx(looper).MinimumSize = New Size(24, 24)
            labelx(looper).Size = New Size(24, 24)
            labelx(looper).TextAlign = ContentAlignment.MiddleCenter
            labelx(looper).BackColor = Color.GreenYellow
            labelx(looper).Text = looper.ToString
            
panelx(looper).Controls.Add(labelx(looper))
 
        Next looper

Open in new window

vb.jpg
0
Comment
Question by:jellydeal
  • 2
  • 2
4 Comments
 
LVL 30

Accepted Solution

by:
hnasr earned 500 total points
ID: 24138374
Your code is working and labels are inserted, but overlapping panels.

Replace the hnasr commented lines and check:

            panelx(looper).Width = 123 '* looper ==== hnasr commnted the multiplication
            panelx(looper).Height = 123
            panelx(looper).Location = New Point(10 + (looper-1) * 123, 10) 'hnasr changed the left of the panel
0
 

Author Closing Comment

by:jellydeal
ID: 31569860
Thanks hnasr..
Too close to the trees to see thw woods and all that!
Thanks for your help,
much appreciated.
Kindest regards
Barry
0
 
LVL 30

Expert Comment

by:hnasr
ID: 24141019
You are welcome!
0
 

Author Comment

by:jellydeal
ID: 24145772
0

Featured Post

Live: Real-Time Solutions, Start Here

Receive instant 1:1 support from technology experts, using our real-time conversation and whiteboard interface. Your first 5 minutes are always free.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

If you need to start windows update installation remotely or as a scheduled task you will find this very helpful.
Although it can be difficult to imagine, someday your child will have a career of his or her own. He or she will likely start a family, buy a home and start having their own children. So, while being a kid is still extremely important, it’s also …
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…

785 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question