Merhaba Arkadaşlar 

Eklediğim uygulamada MUSTERIBILGILERI Formunda müşteri bilgilerini kayıt etmek üzere harf ve rakam girdiğim zaman sorun olmuyor. (.) Nokta işaretine tıkladığım zaman DENEME uyarısını veriyor tamamı tıkladığımda nokta işaretini kabul ediyor.  Aşağıdaki Kodu Siliyorum.
Noktalama işaretini kabul ediyor. Müşteriyi  listeden seçip metin kutularına alarak Satış Bilgileri butonuna tıkladığım zaman Bu nesne geçersiz bir biçimde kaydedilmiş ve okunamıyor. Uyarısını alıyorum.

Private Sub Form_KeyPress(KeyAscii As Integer)

If KeyAscii = vbKeyEscape Then

DoCmd.Close

ElseIf KeyAscii = vbKeyDelete Then

MsgBox "DENEME"

End If

End Sub

Arkadaşlar Sorunum hal ettim. Konuyu taşıyabilirsiniz saygılarımla iyi çalışmalar.