Skip to main content

AccessTr.neT


Listede Boş Alan Tıklama Hatası Ve Run-time Error '13'

Listede Boş Alan Tıklama Hatası Ve Run-time Error '13'

#2
Sayın @aydin5353

1. sorunuz için kodunuzu
Private Sub listbox_DblClick(Cancel As Integer)
Dim acilacak_form As String
Dim kriter As String
   
acilacak_form = "kayipsahisgüncellemeekrani"
kriter = "[Kimlik]=" & Me![listbox]
If IsNull(listbox) Or listbox = "" Then Exit Sub
DoCmd.OpenForm acilacak_form, , , kriter
kapat_ok = True
DoCmd.Close acForm, "kayipsahislistesi"
kapat_ok = False
End Sub
şeklinde düzenlerseniz boş alana tıkladığınızda hata vermeden çıkış yapar.

2. sorunuz ile ilgili olarak kayıt sildim ekledim güncelledim defalarca kapattım açtım ancak bende herhangi bir hata vermedi. Uygulama nerede tutuluyo (network / local), bölünmüş veya değil, çalışan bilgisayarda aynı anda çalışan uygulama ve yoğunluğu, ram ve işlem öncelikleri gibi detayları ve network ve user yapınızı tam bilmediğim için form zamanlaması ile ilgili bir değerlendirme yapma şansım yok mevcut hali ile bir sıkıntı görmedim.
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
RE: Listede Boş Alan Tıklama Hatası Ve Run-time Error '13' - Yazar: atoykan - 30/09/2022, 23:13
Task