Recorrer todas las celdas de un Datagridview

[danielles]

Desde ya les doy las gracias a todos, mi pregunta es la siguiente tengo un datagridview y quiero recorrer todas sus celdas ya que cada una es un insert en mi bd idependiente lo he tradado de hacer con el siguiente trozo de codigo

Dim i As Integer = 0
Dim celda As String
Dim dgc As DataGridViewCell
Dim j As Integer




While i < DataGridView1.Rows.Count
While j < DataGridView1.Columns.Count
dgc = DataGridView1.Rows(i).Cells(j)
celda = (CType(dgc.Value, String)) & "" & vbCrLf & ""
'celda = dgc.Value
MsgBox(celda)
j = j + 1
End While
i = i + 1
End While

pero puedo recorrer toda la primera fila pero al salir del bucle interno se sale tambien del primer bucle que es para recorrer las filas.
espero que se haya entendido.
Saludos