Actualizacion de registros en postgres con vb.net

[cobyz21]

Hola foro, estoy iniciando en esto de la programacion y estoy realizando un proyecto con vb.net y postgres. Cuando intento hacer la actualizacion me manda el siguiente error.


Infracción de concurrencia: UpdateCommand afectó a 0 de los 1 registros esperados.

Codigo de error :
en System.Data.Common.DbDataAdapter.UpdatedRowStatusE rrors(RowUpdatedEventArgs rowUpdatedEvent, BatchCommandInfo[] batchCommands, Int32 commandCount)
en System.Data.Common.DbDataAdapter.UpdatedRowStatus( RowUpdatedEventArgs rowUpdatedEvent, BatchCommandInfo[] batchCommands, Int32 commandCount)
en System.Data.Common.DbDataAdapter.Update(DataRow[] dataRows, DataTableMapping tableMapping)
en System.Data.Common.DbDataAdapter.UpdateFromDataTab le(DataTable dataTable, DataTableMapping tableMapping)
en System.Data.Common.DbDataAdapter.Update(DataTable dataTable)
en SystemSTP.frm_planta.btn_guarda_Click(Object sender, EventArgs e) en C:\Forms\frm_usuario.vb:línea 349

La linea 349 es: NpDataAdapter.Update(DataTab)

El codigo es:

Private fila As Integer
Private DataTab As DataTable
Private NpDataAdapter As Npgsql.NpgsqlDataAdapter

Private Sub btn_guarda_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_guarda.Click

Dim DataRo As DataRow = DataTab.Rows(fila)
' Asignar los datos de los textbox a la fila
asignarDatos(DataRo)

Try
NpDataAdapter.Update(DataTab)
DataTab.AcceptChanges()
Catch ex As DBConcurrencyException
MsgBox("Error de concurrencia: " & vbLf & ex.Message & vbLf & vbLf & "Codigo de error :" & vbLf & ex.StackTrace, MsgBoxstyle.Critical, "Error")
Catch ex As Exception
MessageBox.Show(ex.Message)

End sub

Private Sub asignarDatos(ByVal dr As DataRow)
'Asignar los datos que hay en los textbox
dr("ficha") = txt_ficha.Text
dr("nombre") = txt_nombre.Text
end sub


PD: Les agradeceria mucho por tu ayuda.