Skip to main content

AccessTr.neT


ekran klavyesini tüm metin kutularında kullanmak

ekran klavyesini tüm metin kutularında kullanmak

#9
Merhaba, benim backspace için verdiğim kodda docmd.close şeklinde kod yok.

Backspacenin kodları

Dim infield As String

   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
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Cvp: ekran klavyesini tüm metin kutularında kullanmak - Yazar: ozanakkaya - 07/01/2017, 02:35
Task