Metin Kutularında Nokta Sorunu

27/08/2018, 12:10

m_demir

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




27/08/2018, 14:10

m_demir

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