Array browser - Dataset population from array

Private Function TwoDArrayToDataTable(ByVal a As Array) As DataTable

Dim dt As New DataTable

For j As Integer = 0 To a.GetUpperBound(1)

dt.Columns.Add("Col " & j.ToString(System.Globalization.CultureInfo.InvariantCulture))

Next j

For i As Integer = 0 To a.GetUpperBound(0)

Dim dr As DataRow = dt.NewRow

For j As Integer = 0 To a.GetUpperBound(1)

dr(j) = a.GetValue(i, j)

Next j

dt.Rows.Add(dr)

Next i

Return dt

End Function

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim a As String(,) = New String(,) {{"A", "B", "C", "D"}, {"E", "F", "G", "H"}}

DataGridView1.DataSource = TwoDArrayToDataTable(a)

End Sub