А вот как сделать обработчик если у нас массив этих кнопок???
Код:

Dim i As Integer
Dim DynamicButton(3) As Button
For i = 1 To 3
DynamicButton(i) = New Button
With DynamicButton(i)
.Parent = Me
.Location = New Point(10 * i, 10 * i)
.Size = New Size(40, 40)
.Text = ""
End With
Next