Динамическое создание элементов в нужном элементе - VB

Формулировка задачи:

Доброго времени суток,
Назрела необходимость, создать динамически объекты в нужном мне элементе sstab или frame:

Private Sub Create_Shape(Count_sh As Integer)
For i = 0 To Count_sh
    Set sh(i) = Me.Controls.Add("VB.Shape", "sh" & i)
    sh(i).Height = Text1(i).Text
    sh(i).Width = Text2(i).Text
    sh(i).Top = 100
    sh(i).Left = 100
    sh(i).Visible = 1
    sh(i).Shape = 0
Next i
End Sub

Поиск не помог... Т.е. работает создание Me.controls.Add на главной форме, как же указать что нужно создать их во frame или sstab. Вроде должно быть просто, но ответа так и не нашёл.

Решение задачи: «Динамическое создание элементов в нужном элементе»

textual
                            Листинг программы 
                        

                            Private Sub Create_Shape(Count_sh As Integer)
.....
    set sh(i).Container  = Frame1
.....
Next i
End Sub

                        

Оцени полезность:

9 голосов , оценка 3.889 из 5

Похожие ответы