Forms(GeciciFormAdi).SetFocus
SendKeys "{ENTER}"
Forms!frmKeyboard.SetFocus
DoCmd.Close
backspace butonunun kodları
If IsNull(Forms(GeciciFormAdi)(GeciciKontrolAdi)) Then Exit Sub
infield = Forms(GeciciFormAdi)(GeciciKontrolAdi)
If Len(infield) = 0 Then Exit Sub
infield = Left(infield, Len(infield) - 1)
Forms(GeciciFormAdi)(GeciciKontrolAdi) = infield
formda delete butonu yok, delete butonu tıklandığında ne olacağını bilmediğim için yorum yapamayacağım.