Как наложить на форму количество лейблов, соответствующих количеству дней в месяце? - VB

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

Здравствуйте! Продолжаю писать прогу "график работы" и возник вопрос... Как не вручную, а программно положить на форму лейблов, число которых будет соответствовать числу дней в месяце? Предыдущий вариант моей программы использовал заготовленную форму с 31 лейблом, что не очень удобно, так как в разных месяцах, разное количество дней(что сбивает с понтолыги юзера))... P.S. как программно убирать с формы её элементы(лейблы, текстбоксы, кнопки и т.д...) ?

Решение задачи: «Как наложить на форму количество лейблов, соответствующих количеству дней в месяце?»

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

                            Private Sub Form_Load()
Dim i%
Label1(0).Visible = False
For i = 1 To DateSerial(Year(Date), Month(Date) + 1, 1) - DateSerial(Year(Date), Month(Date), 1)
  Load Label1(i)
    With Label1(i)
    .Visible = True
    .BorderStyle = 1
    .Caption = i
    .Width = 390
    .Height = 390
    .Top = 390
    .Left = i * 400
   End With
Next i
End Sub
                        