Как в Run-time создать массив кнопок (класс) Vb6

[LENA555]

Как в run-time создать массив кнопок используя класс?
вот часть кода из модуля класса

Set MyButton = Form1.Controls.Add("VB.CommandButton", "MyButton")
With MyButton
.Height = 300
.Width = 300
.Caption = "кнопка"
.Top = 0
.Left = 0
'.Index = 0 'как создать массив?????????????? ошибка!!!!
.Visible = True
End With

Помогите решить проблему плиз