Try Me.Validate() Me.BEEE_QueryBindingSource.EndEdit() Me.TableAdapterManager.UpdateAll(Me.EDARADataSet) Catch ex As Exception MsgBox(ex.Message, MsgBoxStyle.Critical, "Error") End Try