Hỏi về VB.NET 2005

[kiluahl]

Ai biết cách tạo một array control không chỉ giúp em với.
VD tạo một mảng các button

[chimera]

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim i, j As Integer
Dim btn(4, 4) As Button
Dim count As Integer = 1
For i = 0 To 4
For j = 0 To 4
btn(i, j) = New Button
btn(i, j).Name = "Button" & count
btn(i, j).Text = count
btn(i, j).Height = 50
btn(i, j).Width = 50
btn(i, j).Top = 20 + (i * 50)
btn(i, j).Left = 20 + (j * 50)
AddHandler btn(i, j).Click, AddressOf Button_Click
Me.Controls.Add(btn(i, j))
count = count + 1

Next
Next
End Sub


Private Sub Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim btn As Button
btn = CType(sender, Button)
MessageBox.Show(btn.Name)
End Sub