Как создать экземпляр класса в определенном контейнере?

[GRS]

Есть PictureBox, в нем надо создать другой PictureBox... Как

(Чего-то не могу с контенерами разобраться. Для чего вообще свойство Container используется? )

PS А создаю новый PictureBox я так:

Код: Выделить всё

Me.Controls.Add("vb.picturebox", "Picture2").Visible = True

Спасибо

[keks-n]

В стадии дизайна формы на пикчебокс кладёшь еще один пикчебокс и ставишь ему Index=0
Потом, когда надо добавить новый, то:

Код: Выделить всё

Load ВложенныйПикчебокс(1)
ВложенныйПикчебокс(1).Visible=True


[Amed]

Код: Выделить всё

Me.Controls.Add("vb.picturebox", "Picture1").Visible = True
Me.Controls.Add("vb.picturebox", "Picture2").Visible = True
Set Me.Controls("Picture2").Container = Me.Controls("Picture1")

[GRS]

Код: Выделить всё

Me.Controls.Add("vb.picturebox", "Picture1").Visible = True
Me.Controls.Add("vb.picturebox", "Picture2").Visible = True
Set Me.Controls("Picture2").Container = Me.Controls("Picture1")

Благодарю, все работает в лучшем виде .

Keks-n, тоже хорошая идея, спасибо !
---------------------------------------------------------------

Почему-то API SetParent ругается и говорит мне, что объект не существует... И еще : Me.Controls.Add создать - создает, а свойства потом у объекта не изменяются, тоже - мол объект Required. Почему

А через Me.Controls("ИМЯ ОБЪЕКТА") все работает на ура - это мне что, для каждого "программно созданного" экземпляра придется отписывать Me.Controls("ЕГО ИМЯ").ЕГО СВОЙСТВО ???

[alibek]

А через Me.Controls("ИМЯ ОБЪЕКТА") все работает на ура - это мне что, для каждого "программно созданного" экземпляра придется отписывать Me.Controls("ЕГО ИМЯ").ЕГО СВОЙСТВО ???

Да, прикинь.

[GRS]

уууужас.... Чё, серьёзно?!

[keks-n]

Именно так, посему лучше(и быстрее) через Load