Seems like you would load the reader data using DataTable Load method

Of course for you the data provider would change.
Code:
Public Sub demo()
    Using cn As New OleDb.OleDbConnection With {.ConnectionString = "Your connection string"}
        Using cmd As New OleDb.OleDbCommand With {.Connection = cn}
            cmd.CommandText = "SELECT * FROM SomeTable"
            Dim dt As New DataTable
            cn.Open()
            dt.Load(cmd.ExecuteReader)
        End Using
    End Using
End Sub
Then cycle thru the rows as needed to inspect your data.