Dim txtKrt As String
txtKrt = Me.SAD.Text
Me.Requery
DoCmd.GoToControl "SAD"
Me.SAD = txtKrt
Me.SAD.SelStart = Nz(Len(Me.SAD), 0)
SAD_KeyPress tuşa basıldığında olayını silip değiştiğinde olayına aşağıdaki kodu yazmayı dener misiniz?