.net - 当你在数据表上循环时如何删除行

Question

For Each Dr As DataRow In InvoiceDT.Rows
    Dim DrResult As Array = PaymentInvoiceDT.Select("Amount='" & Dr("Amount").ToString() & "'")
    If DrResult.Length > 0 Then
        ''some code
    Else
        InvoiceDT.Rows.remove(Dr) 
    End If
Next

它给出了错误，因为当您更改数据表中的某些内容时，其索引会更改。

Answer 1

您将无法在 For Each 循环中执行此操作，因为当您删除某些内容时，集合已更改并且您无法再枚举它。

你需要的是一个反向的 For 循环。

For i as Integer = Invoice.Rows.Count -1 to 0 Step -1
    Dim DrResult As Array = PaymentInvoiceDT.Select("Amount='" & Invoice.Rows(i).("Amount").ToString() & "'")
    If DrResult.Length > 0 Then
        'some code
    Else
        InvoiceDT.Rows.remove(InvoiceDT.Rows(i)) 
    End If
Next

即使您删除行，这仍然有效，因为您没有接触的行没有更改其索引并且它不使用枚举。