Skip to main content

AccessTr.neT


Buton Aktivasyonu Hakkında

Buton Aktivasyonu Hakkında

Çözüldü #1
Merhabalar,

Ekli örneğimde çalışan butonları göreceksiniz. bu haliyle gayet kullanışlı. Ancak harf kısmına tekrarlanan bir veri girdiğimde bu alan anahtar alan olduğu için kayıt butonuna bastığımda doğal olarak hata veriyor  ama bu esnada komut12 butonu da aktif oluyor. Komut12 butonunun sadece kayıt gerçekleştiği zaman aktif olmasını istiyorum. Sadece kayıt butonuna basılmış olmasıyla bir aktiflik istemiyorum. Nasıl yapılabilir?.
.zip Database1011.zip (Dosya Boyutu: 44,11 KB | İndirme Sayısı: 9)
Cevapla
#2
Harf metin kutusunun güncelleştirme sonrasında olayına aşağıdaki kodu yazarsanız, aynı harf daha önceden girilmiş ise düzeltmeniz konusunda uyarır ve butonu tekrar kilitler

Dim VarMi As String


VarMi = Nz(DLookup("Kimlik", "Tablo1", "[harf]='" & Me.harf & "'"), 0)

If VarMi <> 0 Then
    Komut12.Enabled = False
    MsgBox ("girdiğiniz" & Me.harf & " daha önce girilmiş, lütfen düzeltiniz")
    Me.sayı.SetFocus
    Me.harf.SetFocus
Else
    Komut12.Enabled = True
End If

koda ekleme yaparak diger butonlarda da kontrol sağlayabilirsiniz.
Cevapla
#3
Merhaba Ozan Bey,

Teşekkürler. Bu ihtiyacımı çözüyor. Peki harf alanı harf değil de bir sayı alanı olursa bu tırnak içine alma durumları nasıl değişiyor? Şu metin alanlarıyla sayı alanlarının tırnak meselelerini çözemedim daha da..
Cevapla
#4
Tablodaki alanın veri türü sayı olursa kriter kısmı aşağıdaki gibi olur.

"[harf]=" & Me.harf

Konu taşınmıştır.
Cevapla
#5
Teşekkürler..
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da