Полагаю, вы бы использовали что-то вроде следующего:
_sqlADP.Fill(_dataSet)
For Each row As DataRow In _dataSet.Tables(0).Rows
Next
Вы также можете рассмотреть возможность использования DataReader, который, вероятно, более аналогичен VB6 RecordSet, так как я считаю, что ADO RecordSet имееттолько для чтения, прямое поведение по умолчанию.Если бы вы использовали DataReader, ваш цикл выглядел бы так:
While _dataReader.Read()
End While