Por que no pruebas llenando un DataSet y después recorrerlo. Algo similara lo siguiente:
Código vb:
Ver original'Creo un Adapter
Dim objAdapter As New SqlDataAdapter("SELECT * FROM TUTABLA", objConn)
'Creo un DataSet
Dim objDataSet As New DataSet
'Lleno el DataSet con la Tabla
objAdapter.Fill(objDataSet, "TUTABLA")
y después lo recorres asi:
Código vb:
Ver original'De esta forma recorres
For m = 0 To objDataSet.Tables(0).Rows.Count - 1
'Para tener acceso a las columnas asi
bjDataSet.Tables(0).Rows(m).Item(X)
Next
Donde X es el número de la columna.
Espero y te sirva, Saludos desde México!