Заполнить DGV случайными числами - Visual Basic .NET

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

Здравствуйте!!! помогите пожалуйста с проблемой: Необходимо заполнить DataGrid 6х6 случ числами, а потом проверить, сумма определённых ячеек равна определ числу или нет. Вот код:

                    Листинг программы
                
 
                        
                          
                    
Private Sub f1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Randomize()
        Dim cel = New DataGridViewTextBoxCell()
        ' Dim Row As DataGridViewRow
        For i = 1 To 5
            dt.Rows.Add()
        Next
        Dim rand = New Random()
        For i = 1 To 6
            For j = 1 To 6
                cel(i, j).Value = Int(Rnd() * 50 - 15)
                ' dt.Items.Add(Int(Rnd() * 50 - 15))
                'sender.Rows(i).Cells(j) = Int(Rnd() * 50 - 15).ToString
                'Row(i).Cells(j) = Int(Rnd() * 50 - 15)
                'dt.Item(i, j).Value = Int(Rnd() * 50 - 15)
            Next
        Next
 
    End Sub

Пробовал разные способы. Всё время выдаёт ошибку. Что и как исправить??? Спасибо заранее!!!

Решение задачи: «Заполнить DGV случайными числами»

textual
                            Листинг программы 
                        
dt.Rows(0).HeaderCell.Value = "Заголовок Строки"