Code:
Private Sub Test()
For Each row As DataRow In dtMyTable.Rows
Debug.Print("{0}", row(0))
Next
End Sub
Private Sub Test2()
If dtMyTable.Rows.Count > 0 Then
For Each row As DataRow In dtMyTable.Rows
Debug.Print("{0}", row(0))