Visual Basic.NET - No elimina fila del dataset

al realizar la eliminación de un fila en el dataset parece que no elemina correctamente.
Capturo una fila del datagrid y realizo una busqueda secuencial en un dataset y lo elimino. Antes de eliminar cargo la fila encontrada a otra tabla.
sin embargo cuando quiero eliminar otra fila del data grid
al realizar la busqueda secuencial en el Dataset Vuelve a encontrar la fila eliminada y sale un ERROR ( No se puede obtener acceso a la información eliminada de una fila.)
Supongo que ya no debia estar ahi la fila que he eliminado, si no es asi como funciona el dataset?
les envio el codigo:

datoElim = Me.DGdatos.Item(Me.DGdatos.CurrentCell.RowNumber, 0)
n = Me.dsModificar.Tables("Tabla Original").Rows.Count
For i = 0 To n - 1
Aux = Me.dsModificar.Tables("Tabla Original").Rows(i).Item("id_partes")
If datoElim = Aux Then
drGuardar.Item("dato1") = Me.dsModificar.Tables("Tabla Original").Rows(i).Item("dato1")
drGuardar.Item("dato2") = Me.dsModificaParte.Tables("Tabla Original").Rows(i).Item("dato2").
Me.dsModificaParte.Tables("Tabla Guardar eliminados").Rows.Add(drGuardar)
Me.dsModificar.Tables("Tabla Original").Rows(i).Delete()
i = n ' finaliza el ciclo
End If
Next

Le agradeceria que me indiquen cual es el error que estoy cometiendo
Salu2

Es realmente urgente poder resolver el problema le aradeceria mucho el poder ayudarme.
Cuenado elimino una fila del data set sigue exisiendo la misma cantidad de filas
n = Me.dsModificar.Tables("Tabla Original").Rows.Count

despues de aplicar el DELETE(la siguiente linea )

Me.dsModificar.Tables("Tabla Original").Rows(i).Delete()

siguen existiendo la misma cantidad de filas en la tabla del Dataset.

donde esta el error?

utiliza el AcceptChanges.

Me.dsModificar.Tables("Tabla Original").Rows(i).Delete()
Me.dsModificar.Tables("Tabla Original").AcceptChanges()

Gracias H Torrez
si funciona