Scorre griglia e visualizza Dati Colonna e Valore

la griglia e' gia' popolata,
scorre ogni row e visualizza tutti i nomi delle colonne e loro valore per ogni record


Dim rowNumber As Integer = 1
Dim I As Integer
' conta quante righe ci sono

For Each row As DataGridViewRow In DataGridView1.Rows
If row.IsNewRow Then Continue For
'row.HeaderCell.Value = "Row " & rowNumber

rowNumber = rowNumber + 1
Next
' visualizza il contenuto di ogni colonna (campo)per ogni riga

Dim Righe As Long
For Righe = 0 To rowNumber - 1
For I = 0 To DataGridView1.ColumnCount - 1


Debug.Print("Campo Tabella " & DataGridView1.Columns(I).Name & " - Valore " & DataGridView1.Rows(Righe).Cells(I).Value.ToString)


Next I
Next Righe