Private Sub BindingNavigatorMoveNextItem_Click(ByVal sender As System.Object, _
  ByVal e As System.EventArgs) Handles BindingNavigatorMoveNextItem.Click
		Try
			Me.BindingSource.EndEdit()
		Catch
			MessageBox.Show("Error Number: " + Err.Number.ToString + Chr(10) + _
  "Description: " + Err.Description, "Ein Fehler ist aufgetreten", _
  MessageBoxButtons.OK, MessageBoxIcon.Error)
		End Try
	End Sub