Ayuda con Arreglo Bidimensional en Visual Basic 2008 please

[samgie10]

Hola chicos quisiera que me ayuden en este problema que tengo, necesito crear un arreglo de 4 filas x 4 columnas y mostrarlo en un DataGridView estuve haciendo este codigo pero me sale un error: No se controlo ArgumentOutOfRangeException {"El índice estaba fuera del intervalo. Debe ser un valor no negativo e inferior al tamaño de la colección. Nombre del parámetro: index"} ayudenme porfis.


Public Class Form1
Dim arreglo(,) As Integer = {{1, 2, 3, 4}, {5, 6, 7, 8}}

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

For j = 0 To 3
DataGridView1.Columns.Add("col", "Columna " & j)
Next

For i = 0 To 3
For j = 0 To 3
DataGridView1.Rows(i).Cells(j).Value = arreglo(i, j)
Next
Next
End Sub
End Class

Una pregunta mas porfa como podria ingresar los valores del arreglo por teclado?