Bueno, de tanto intrusear logre

realizar la eliminacion, y me quedo lo siguiente:
Dim fila As DataRow
Dim borra As DataRow
Dim columna As DataColumn
tabla as datatable
'se llena la tabla con elementos
For Each fila In tabla.Rows
If fila("Codigo") = codigo.Text Then
borra = fila
MsgBox1.ShowMessage("Registro " & fila("Codigo") & "Eliminado")
End If
Next
tabla.Rows.Remove(borra)
Lo bueno de esto, es que se puede editar en un datagrid, antes de grabar en la base de datos.
Saludos