Skip to main content

AccessTr.neT


Tarihe Göre False True Yapmak

Tarihe Göre False True Yapmak

Çözüldü #1
arkadaşlar mrb. küçük bir çalışma yapıyorum. ekte gönderdiğim örnekte veri girişi formunda sigorta bitiş tarihi günümüz tarihinden küçük ise formun ilgili kaydı false durumuna geçmesini istiyorum. teşekkür ederim
.rar örnek.rar (Dosya Boyutu: 51,89 KB | İndirme Sayısı: 1)
Son Düzenleme: 20/09/2019, 19:29, Düzenleyen: alperadn01.
Cevapla
#2
işlemler metin kutuları üzerinden gerçekleştiği için işlemleri metin kutusu adına göre yapmalısınız alan adına göre değil
Mesela "TC_no" alan adı ama ilişkili metin kutusunun adı "tcno"
dolayısıyla
tc_no.Enabled = False yerine
tcno.Enabled = False olmalı
diğerleri için de aynı şey geçerli
iyi çalışmalar
Cevapla
#3
(20/09/2019, 19:37)berduş yazdı: işlemler metin kutuları üzerinden gerçekleştiği için işlemleri metin kutusu adına göre yapmalısınız alan adına göre değil
Mesela "TC_no" alan adı ama ilişkili metin kutusunun adı "tcno"
dolayısıyla
tc_no.Enabled = False yerine
tcno.Enabled = False olmalı
diğerleri için de aynı şey geçerli
iyi çalışmalar
Verdiğiniz cevap için teşekkür ederim ama mesele bu değil gibi sorun çözülmedi. ayrıca sadece o şartı taşıyan kayıtlar false olsun istiyorum
Son Düzenleme: 20/09/2019, 20:20, Düzenleyen: alperadn01.
Cevapla
#4
tam olarak ne istediğinizi daha ayrıntılı anlatır mısınız?
Cevapla
#5
(20/09/2019, 20:29)berduş yazdı: tam olarak ne istediğinizi daha ayrıntılı anlatır mısınız?
Sigorta bitiş tarihi günümüz tarihinden küçük olması durumunda yani sigorta süresi sona ermiş kayıtların form üzerinde false konumuna yani pasif olmasını istiyorum. Yani işlem yapmaya kapanmasını istiyorum
Son Düzenleme: 20/09/2019, 20:36, Düzenleyen: alperadn01.
Cevapla
#6
formload olayındaki kodu silip form current olayına aşağıdaki kodları yazıp dener misiniz?
Kod:
Private Sub Form_Current()
If Me.sigortabitişi < Date Then
Me.tcno.Enabled = False
Me.adısoyadı.Enabled = False
Me.işebaşlama.Enabled = False
Me.iştenayrılış.Enabled = False
Me.sigortabaşlagıcı.Enabled = False
Me.sigortabitişi.Enabled = False
Else
Me.tcno.Enabled = True
Me.adısoyadı.Enabled = True
Me.işebaşlama.Enabled = True
Me.iştenayrılış.Enabled = True
Me.sigortabaşlagıcı.Enabled = True
Me.sigortabitişi.Enabled = True
End If
End Sub

Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task