RemoveAt Revisited

While I have searched the forums and found a few others having the same problem as I, there does not seem to be an answer.

I am trying to delete a set of rows and no matter what I do, it never deletes the last row I remove. Yes I "repopulate" still no luck.

So if anyone can answer me I would appreciate it. Let's say I have three rows I want to remove, row.index = 12, row.index = 14 and row.index = 16
I use:

ReportControl.Records.RemoveAt(12)
ReportControl.Records.RemoveAt(14)
ReportControl.Records.RemoveAt(16)

ReportControl.Populate()

and row 16 is still there

So what am I doing wrong?

Hi,

In your piece of code:
ReportControl.Records.RemoveAt(12)
ReportControl.Records.RemoveAt(14)
ReportControl.Records.RemoveAt(16)

Note that when you remove row 12, the overall number of rows is decresed, and the row which was 14, now becomes 13. To easily get round of this effect, just change the order of operations:

ReportControl.Records.RemoveAt(16)
ReportControl.Records.RemoveAt(14)
ReportControl.Records.RemoveAt(12)

--
WBR,
Serge

Looks like the problem in the line with RemoveAt. Note that Records and Rows could have different indexes (because of sorting, etc). So far, the corrected line would be:
wndReportControl.Records.RemoveAt (Row.Record.Index)

--
WBR,
Serge

Is there a way to accomplish this using a "For Each"?

Dim row As ReportRow
 
For Each row In rptDrawers.Rows
    rptDrawers.Records.RemoveAt row.Index
Next row

rptDrawers.Populate

Actually, I made a mistake in the post. 

Change: For Each row In rptDrawers.Rows

To: For Each row In rptDrawers.SelectedRows

I noticed I made that mistake this morning and changed it but I still have the same problem.

I ended up doing it from the end up.  However, you may want to look at the RemoveAt code sample in the documentation.  It's doing what I was doing, which didn't work.

Thanks!