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

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

它给出了错误,因为当您在datatable中更改某些内容时,其索引会发生更改.

解决方法

您将无法在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

即使在删除行时,这仍然有效,因为您没有触摸的行没有更改其索引并且不使用枚举.