Hola Speack, soy PRT147, tu me ayudaste sobre una funcion de actualizacion de registros, antes que nada te lo quiero agradecer y espero que puedas ayudarme nuevamente pq estoy trabado en el Form y no lo puedo terminar. Te comento que tenias razon el problema que tengo es en el filtro pero realmente no se como modificar el codigo, necesitaria si lo puedes chequear y ponerme el codigo para que antes de llamar a la funcion se filtre el formulario detalle de manera que pueda realizar alguna modificacion. A continuacion te detallo mi codigo
Me.OperadoresBindingSource.Filter = "Codigo_oper = " & Me.TB_Codigo.Text & " And Identificador=2"
Una vez filtrado el formulario con el registro ubicado realizo los cambios y llamo a esta Funcion
Public Function ModifOper(ByVal Cedula As String, ByVal RowId As Integer) As Boolean
Try
Dim conect As New SqlCeConnection(My.Settings.LaLolaConnectionString )
conect.Open()
Dim ds As New DataSet
Dim adp As New SqlCeDataAdapter("Select * from Operadores", conect)
adp.Fill(ds)
Dim fila As DataRow = ds.Tables(0).Select("Id = " + RowId.ToString + "0")(0)
fila.BeginEdit()
fila("Identificador") = Me.L_Identificador.Text
fila("Codigo_oper") = Me.TB_Codigo.Text
fila("Den_oper") = Me.TB_RazonSocial.Text
fila("Domicilio") = Me.TB_Domicilio.Text
fila("Telefono") = Me.TB_Telefono.Text
fila("Celular") = Me.TB_Celular.Text
fila("Fax") = Me.TB_Fax.Text
fila("Email") = Me.TB_Email.Text
fila("Contacto") = Me.TB_Contacto.Text
fila("Estado") = Me.L_Estado.Text
fila.EndEdit()
Dim cb As New SqlCeCommandBuilder(adp)
adp.Update(ds)
ds.Tables(0).AcceptChanges()
Return True
conect.Close()
Catch ex As DataException
MessageBox.Show(ex.Message)
Return False
Catch ex2 As SqlCeException
MessageBox.Show(ex2.Message)
Return False
End Try
End Function
El error que me devuelve "Indice fuera de los limites de la matriz"
Gracias nuevamente y saludos
. 
