Как запихнуть шахматное поле состоящее из картинок в двумерный массив

dim l as integer
for l=1 to 64
Dim cell as new picturebox
dim count = panel.controls.count
cell.width=70
cell.height=70
cell.top=70*(count\80)
cell.left=70*(count mod 8)
i=cell.top
j=cell.left
if (i+j) mod 2=0 then
cell.BackColor=color.white
else
cell.backcolor=color.black
end if
Panel.Controls.Add(cell)
next

        Dim WDT As Integer = 40 'Задаем величину секций
        Dim PB(8, 8) As PictureBox
        For I As Integer = 0 To 7
            For T As Integer = 0 To 7
                PB(I, T) = New PictureBox
                With PB(I, T)
                    .BorderStyle = BorderStyle.FixedSingle
                    .Width = WDT
                    .Height = WDT
                    .Top = I * WDT
                    .Left = T * WDT
                    .BackColor = Color.FromArgb(255, 255, 255 - I * T * 2)
                End With
                Panel1.Controls.Add(PB(I, T))
            Next
        Next
        PB(2, 6).BackColor = Color.Red 'Обращаемся к любому PicturBox

.BackColor = Color.FromArgb(255, 255, 255 - I * T * 2)

        Dim WDT As Integer = 40 'Задаем величину секций
        Dim PB(8, 8) As PictureBox
        For I As Integer = 0 To 7
            For T As Integer = 0 To 7
                PB(I, T) = New PictureBox
                With PB(I, T)
                    .BorderStyle = BorderStyle.FixedSingle
                    .Width = WDT
                    .Height = WDT
                    .Top = I * WDT
                    .Left = T * WDT
                    If I Mod 2 = 0 And T Mod 2 <> 0 Or I Mod 2 <> 0 And T Mod 2 = 0 Then
                        .BackColor = Color.DarkRed
                    Else
                        .BackColor = Color.Yellow
                    End If
                End With
                Panel1.Controls.Add(PB(I, T))
            Next
        Next
        PB(2, 6).BackColor = Color.Red 'Обращаемся к любому PicturBox

Компонент.Свойство1 = Значение
Компонент.Свойство2 = Значение
Компонент.Свойство3 = Значение
Компонент.Свойство4 = Значение

With Компонент
    .Свойство1 = Значение
    .Свойство2 = Значение
    .Свойство3 = Значение
    .Свойство4 = Значение
End With