comment faire pour supprimer la ligne quand u boucle sur datatable

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

Est en erreur, car lorsque vous changé quelque chose dans datatable, son index se changer.

OriginalL'auteur Sai Sherlekar | 2011-08-26