Grande! Ho eliminato il ciclo for e ho usato:

codice:
 Dim mioR As DataRow = myDs.Tables("miaTab").Rows(0)