Para iterar en un DataTable usa el siguiente código.
VB.NET:
-
Dim tabla as new DataTable()
-
Dim Renglon as DataRow
-
For Each Renglon in tabla.Rows
-
'Haz algo con Renglon("NombreDeColumna")
-
Next