VB.NET: Problem with databinding

[m_mohanna]

I've problem with databinding in vb.net
The problem that i'm trying to set a text field of the databinding programmatically during runtime, the change appears on the form, but after save the new value is not saved to database, if i edit this field manually by the keyboard it is updated correctly.
here's my code, the Q_ID textbox is the filed belongs to HEADERBindingSource binding source, i try to set it by the value of newQ_id, anyone can tell me what is missing?

Private Sub Q_IDTextBox_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Q_IDTextBox.TextChanged
If newRecord = 1 Then
Q_IDTextBox.Text = newQ_id
newRecord = 0
Else
QueryQuestionaire()
End If
End Sub

Private Sub Q_HEADERBindingNavigatorSaveItem_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Q_HEADERBindingNavigatorSaveItem.Click
Me.Validate()
Me.Q_HEADERBindingSource.EndEdit()
Me.Q_HEADERTableAdapter.Update(Me.CSIDataSet.Q_HEA DER)
SaveQuestionaire()
End Sub

[m_mohanna]

no reply???