+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Açılan Kutudaki seçime göre işlem yapmak (/konu-acilan-kutudaki-secime-gore-islem-yapmak.html)
Cvp: Açılan Kutudaki seçime göre işlem yapmak - ozanakkaya - 30/08/2015
kodu aşağıdaki ile değiştirin, metin kutusu isimleri farklı ise kodu düzeltin.
=IIf(IsNull([tarih1]) or IsNull([tarih2]);"";Nz(Diff2Dates("dmy";[tarih1];[tarih2];Doğru)))
Ayrıca, açılan kutunun satır kaynak türünü "değer listesi yaptığınızda, "ÇALIŞIYOR";"ÇALIŞMIYOR" şeklinde yazmayınız
1;"ÇALIŞIYOR";2;"ÇALIŞMIYOR" şeklinde yazıp sütun sayısı: 2, sütun genişliği: 0;5 şeklinde yazınız.
Bu şekilde tabloya 1 veya 2 kaydeder. Tablo boş yere şişmez. Formdaki cinsiyet, medeni durum ve doğum yeri alanları da aynı şekilde.
1. mesajdaki Metin kutusu gizleme sorunuz için;
option explicit kodunun altına
Sub Calisiyormu()
If Me.durumu = "ÇALIŞIYOR" Or IsNull([durumu]) Then
Me.AYRILISNEDENI.Visible = False
Me.AYRILISTAR.Visible = False
Me.CALISTIGIGUN.Visible = False
Else
Me.AYRILISNEDENI.Visible = True
Me.AYRILISTAR.Visible = True
Me.CALISTIGIGUN.Visible = True
End If
End Sub
kodu ekle, formun geçerli olduğunda olayına ve durumu metin kutusunun güncelleştirme sonrasında olayına
Calisiyormukodu ekle.
Cvp: Açılan Kutudaki seçime göre işlem yapmak - fascioğlu - 30/08/2015
Sayın Ozan hocam,
Yazmış olduğunuz kodları uyguladım,fakat durumu ile ilgili kısmı yapamadım,
Örnek ekte.
saygılarımla.
Cvp: Açılan Kutudaki seçime göre işlem yapmak - ozanakkaya - 30/08/2015
Tabloya Çalışıyor için 1, çalışmıyor için 2 yazdırıyorsanız
If Me.durumu = "ÇALIŞIYOR" Or IsNull([durumu]) Then
yerine
If Me.durumu = "1" Or IsNull([durumu]) Then
şeklinde değiştirmeniz gerekiyor.
Ayrıca, gizlenecek veya gösterilecek metin kutuları ile bu metin kutularına ait etiketlerin ilişkilendirilmesi gerekli.
shift tuşuna basılı tutarak Etiket67 etiketi ile AYRILISTAR metin kutusunu seç, sağ altta ünlem işareti olan denetim çıkacak.
Bu işareti tıkla ve "Etiket67 ile AYRILISTAR arasında ilişki kur" yazısına tıkla
Cvp: Açılan Kutudaki seçime göre işlem yapmak - fascioğlu - 30/08/2015
Sayın Ozan Hocam,
Dediklerinizi yaptım aynen dediğiniz gibi çalıştı,
-Ancak;
Çalışıyor veya Çalışmıyor seçeneğini seçtiğimde hemen değişmiyor ancak ileri veya geri formu çalıştırdığımda veya formu açıp kapattığımda eylemi gerçekleştiriyor.
Saygılarımla.
İyi çalışmalar.
Cvp: Açılan Kutudaki seçime göre işlem yapmak - ozanakkaya - 30/08/2015
Alıntı:...formun geçerli olduğunda olayına ve durumu metin kutusunun güncelleştirme sonrasında olayınaÜstte yazılanları uyguladınız mı?
Calisiyormu
kodu ekle.
Cvp: Açılan Kutudaki seçime göre işlem yapmak - fascioğlu - 30/08/2015
Sayın Ozan hocam,
Yazdıklarınızın tamamını uyguladım,durum 16.Mesajdaki gibi.
Saygılarımla.