Заполнение DataGridView из текстовой строки - Visual Basic .NET

Dim s As String = "3|False|стол|стул|скатерть|True|цветок|дерево|лист|False|небо|солнце|земля"
        Dim arr() = s.Split("|")
        Dim n As Integer = CInt(arr(0))
        DataGridView1.RowCount = n
        Dim k As Integer = 1
        For i = 0 To n - 1
            For j = 0 To 3
                DataGridView1(j, i).Value = arr(k)
                k += 1
            Next
        Next