Won't save the last Entry in Database in VB 2010

[Manbej]

i have a problem with saving last entry in the data base in Visual Basic 2010.

if i enter 3 items (for Example) the program will save the first two, the last one will not store it even when i press save button.

here the code i made for save button:

Private Sub Save_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Save.Click
        Try
            Me.Validate()
            Me.CrimeTableBindingSource.EndEdit()
            Me.TableAdapterManager.UpdateAll(Me.CrimeListDataSet)
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
 
        NameTextBox.Enabled = False
        NickNameTextBox.Enabled = False
        CrimeTextBox.Enabled = False
        NotesTextBox.Enabled = False
 
    End Sub