Программное создание нескольких Label, их удаление - VB

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

Добрый день Уважаемые знатоки языка Visual Basic!!!!! Подскажите пожалуйста, как программно создавать несколько ЭУ Label... одну создать могу, но мне надо несколько сделать одним нажатим кнопки cmdAdd. например, надо создать по 10 меток в трех столбцах, потом туда загрузить данные (10 позиций) из базы данных Access... при нажании на кнопке cmdDel удалить эти эейблы... флексгрид и датагрид в данном случае мне не подходят... надо ТОЛЬКО через Label как??? буду благодарен за помошь

Решение задачи: «Программное создание нескольких Label, их удаление»

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

                            Public WithEvents MyLabel As Label
 
Public Sub Form_Load()
    Set MyLabel = Me.Controls.Add("VB.Label", "LabelX")
    With MyLabel
        .Move 20, 10
        .Caption = "Click me!"
        .AutoSize = True
        .Visible = True
    End With
End Sub
 
Public Sub Form_Unload()
    Me.Controls.Remove "LabelX"
    Set MyLabel = Nothing
End Sub
 
Public Sub MyLabel_Click()
    MsgBox "boo!"
End Sub
                        