删除行时出错。位置上没有排... VB.Net

Question

删除行时出现错误。我这样做的方法是一旦删除一行，我会回到上一行并检查以确保然后继续。我假设DataTable需要重新索引？我试图在最后添加AcceptChanges（），它也不起作用。

下面是我的代码：

For i = 0 to dt.Rows.Count - 1
  If dt.Rows(i)("Isbn").StartsWith("B") Then
    dt.Rows(i).Delete()
    i -= 1
  End If
Next