Динамическое создание объектов формы в Visual Basic 6 - VB

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

Месяц назад решил изучить Visual basic 6. И вот встал перед задачей: Предположим, на форме есть одна кнопка. Нужно, что бы при нажатии на кнопку должна создаваться ещё одна, новая кнопка. Как это реализовать? (Уточнение - изначально на форме ТОЛЬКО ОДНА кнопка!)

Решение задачи: «Динамическое создание объектов формы в Visual Basic 6»

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

                            Private Sub Command1_Click(Index As Integer)
'---------------------
'в свойствах
'Command1(i).Style = 1
'Command1 Index =0
'---------------------
Select Case Index
  Case 0
    n = 10: j = 155 / n
    For i = 1 To n
      Load Command1(i)
      With Command1(i)
      .Caption = i
      .Left = 0
      .Top = (i - 1) * Command1(i - 1).Height
      .BackColor = RGB(100 + i * j, 100 + i * j, 100 + i * j)
      .Visible = True
      End With
    Next
    Command1(0).Visible = False
  Case Else
    Caption = "Вы нажали кнопку " & Index
End Select
End Sub
                        