Visual Basic.NET - Controles en ejecucion...

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Const Columnas As Integer = 2

        Const Filas As Integer = 8

        Dim TablePanel As New TableLayoutPanel

        TablePanel.ColumnCount = Columnas

        TablePanel.RowCount = Filas

        Dim mLbl(Columnas, Filas) As Label

        For i As Integer = 1 To Columnas

            For j As Integer = 1 To Filas

                Dim lbl As New Label

                lbl.Text = "Label " & i & "," & j

                TablePanel.Controls.Add(lbl, j - 1, i - 1)

                mLbl(i - 1, j - 1) = lbl

            Next

        Next

        TablePanel.Left = 0

        TablePanel.Top = 0

        TablePanel.Width = Me.Width

        TablePanel.Height = Me.Height - TablePanel.Top

        TablePanel.BackColor = Color.Beige

        Me.Controls.Add(TablePanel)

    End Sub

For j As Integer = 1 To intColumn

            For i As Integer = 1 To intFilas

                Dim matLabel As New Label

                '....

                'el resto del codigo aqui....

                '....

                TablePanel.Controls.Add(matLabel, j - 1, i - 1)

            Next

        Next

matLabel.Font =.....

matLabel.Dock=...

matLabel(intNumero).Font = ....

matLabel(intNumero).Dock =.....