Vb.net Add all Declared Buttons to my form

Question

i want to add all declared buttons into my form

something like:

dim btn1,btn2,btn3 as new button

for each btn as button in declared.buttons
me.controls.add(btn)
next

Why don't you add them to a collection like List(Of Button) first? Then you can loop them and do whatever you want to do with them. — Tim Schmelter
– Tim Schmelter, Commented Aug 23, 2012 at 15:08
And how do you expect to lay them out? 150 buttons all separately declared? I'm gonna take a guess there's going to be a better way to do what you're trying to acoomplish — hometoast
– hometoast, Commented Aug 23, 2012 at 15:09
@none 150 buttons? Then you’re doing it wrong. Are you maybe abusing buttons to create interactive graphics? Buttons aren’t really suitable here. And otherwise 150 buttons will simply kill the user interface. — Konrad Rudolph
– Konrad Rudolph, Commented Aug 23, 2012 at 15:09
If you just create them as you have above, and without a list, you'd have to use reflection to get all fields from your form. — hometoast
– hometoast, Commented Aug 23, 2012 at 15:18

Steven Doggart · Accepted Answer · 2012-08-23 15:14:26Z

1

You can add the buttons like this:

For i As Integer = 1 To 150
    Dim btn As New Button()
    btn.Name = "btn" + i.ToString()
    Controls.Add(btn)
Next

Later, you can access the buttons like this:

Dim btn As Button = CType(Controls("btn1"), Button)

However, if you are needing to load that many controls dynamically, you may want to reconsider your design. It smells like a bad idea for most situations.

answered Aug 23, 2012 at 15:14

Steven Doggart

43.8k8 gold badges71 silver badges109 bronze badges

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

2 Comments

none Over a year ago

I already know about it, i want to know if i can add all declared buttons into my form in my way. Thanks anyway ;)

Steven Doggart Over a year ago

Ok. The only way you can do that is with reflection.

hometoast · Accepted Answer · 2012-08-23 15:59:16Z

0

You can get all your buttons you've declared using something like this:

Dim buttons = From fi In Me.GetType().GetFields(BindingFlags.Instance Or BindingFlags.NonPublic)
   Where fi.FieldType Is GetType(Button)
   Select CType(fi.GetValue(Me), Button)

Off the top of my head.. Still working on it.. but You get the idea?

edited Aug 23, 2012 at 15:59

answered Aug 23, 2012 at 15:26

hometoast

11.8k5 gold badges43 silver badges58 bronze badges

Collectives™ on Stack Overflow

Vb.net Add all Declared Buttons to my form

2 Answers 2

2 Comments

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

2 Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Related