Создание таблицы в DataGridView

DataGridView1.Rows.Add(res2(0))

Public Class Form2
    Private Sub Form2_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        DataGridView1.ColumnCount = 4
        Button2.Enabled = False
        Button3.Enabled = False
    End Sub
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        DataGridView1.Rows.Add(10)
        Button2.Enabled = True
        Button3.Enabled = True
    End Sub
    Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
        DataGridView1.Rows(1).Cells(2).Value = "test1"
    End Sub
    Private Sub Button3_Click(sender As System.Object, e As System.EventArgs) Handles Button3.Click
        DataGridView1.Rows(3).Cells(3).Value = "test2" 'и на картинке нужно бы исправить
    End Sub
End Class

For i = 1 To main.Count - 1
            s2 = Split(main(i), "</strong>")
            If s2(0).Contains("<a") Then
                Dim res() As String = Split(s2(0), ">")
                Dim res2() As String = Split(res(1), "<")
                DataGridView1.Rows.Add(1) 'с каждым циклом добавляю новую строку
                DataGridView1.Rows(i).Cells(3).Value = res2(0) 'Вставляю данные в строку i в столбец 3
            End If
        Next

For i = 1 To main.Count - 1
     s2 = Split(main(i), "</strong>")
     If s2(0).Contains("<a") Then
         Dim res() As String = Split(s2(0), ">")
         Dim res2() As String = Split(res(1), "<")
         CountMath = CountMath + 1
         DataGridView1.Rows.Add(1)
         DataGridView1.Rows(CountMath).Cells(2).Value = res2(0)
         Label2.Text = CountMath
     End If
Next

DataGridView1.RowHeadersVisible = False

 DataGridView1.RowHeadersWidth = 10
        DataGridView1.RowHeadersWidthSizeMode = DataGridViewRowHeadersWidthSizeMode.DisableResizing