Try
Dim pregunta As String
pregunta = MsgBox("Desea Actualizar sus Datos", MsgBoxStyle.YesNo + MsgBoxStyle.Information, "Manteni")
If pregunta = vbYes Then
Me.DbProdBindingSource.EndEdit()
Me.DbProdTableAdapter.Update(Me.VistaProductosMant eni.dbProd)
Me.VistaProductosManteni.AcceptChanges()
MsgBox("Datos Actualizados Perfectamente", MsgBoxStyle.Information, "Manteni")
Call Me.DesabilitadosManteni()
ElseIf pregunta = vbNo Then
Call Me.DesabilitadosManteni()
End If
Catch ex As Exception
MsgBox("Error " + ex.ToString, MsgBoxStyle.Critical, "Error")
End Try
cuando lo ejecuto da la impresion de actualiza pero en la base no se almacena ningun cambio agradeberia la ayuda
