Access SQL   ›   ACCESS SORULARI VE ÖRNEK UYGULAMALARI   ›   ACCESS SORULARI   ›   [FORM] Etiket ve metin kutusu görüntülenme ve gizlenme

[FORM] Etiket ve metin kutusu görüntülenme ve gizlenme
emreaslan
Aktif Üye 40-100

*
Kayıt Tarihi: 29.06.2012
Toplam 17 konu açtı.
Toplam 89 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2003,
Beğeniler: 0 / 0
#1
03-11-2012, 20:51 (En son düzenleme: 03-11-2012, 21:05 emreaslan.)
Merhabalar,
Eklediğim örneğimde PROJELER DOSYASI formumda ID alanımın güncelleştirme sonrasında formumda ID TANIM YONLENDIRME formum açılıyor.
Bu formumda 4 adet başlığım var bir sorguya bağlı olarak çalışan bu formumda bu 4 başılığdaki metin kutuları içindeki verim "Tanımlı" ise metin kutusunun ve etiketin görünür olmasını verim "Tanımsız" ise metin kutusunun ve etiketin görünmez olmasını sağlayamadım.Eğer 4 başlığım tanımsıza eşit ise ID alanımın güncelleştirme sonrasında açılan bu formumun hiç açılmamasını ama alanlardan biri tanımlıya eşit ise bu form ekranını açtırmamı sağlamam için yardımcı olurmusunuz?
Forumda metin kutusunun görünür olup olmama konusunda örnekler mevcut örneğime uygulamaya çalıştım fakat metin kutuları gizlenmiyor başarılı olamadım.Yol gösterebilir iseniz çok sevinirim.


Eklenti Dosyaları
.rar   GİZLE GÖSTER.rar (Boyut: 812,57 KB / İndirilme: 74)



  Bul
  Alıntı
Bu mesajı beğenenler:
iscinar
Kıdemli Üye >1000

*
Kayıt Tarihi: 21.08.2010
Toplam 48 konu açtı.
Toplam 1.147 yorum yaptı.
Toplam 7 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2007 TR, Office 2010 TR, Office 2013 TR,
Beğeniler: 0 / 2
#2
03-11-2012, 21:21
ID TANIM KONTROL formunuzun Geçerli olduğunda olayına aşağıdaki kodları ekleyebilirsiniz.

Visual Basic
  1. Private Sub Form_Current()
  2.  
  3.     If [HASSAS MALZEME KONTROL] = "Tanımsız" Then
  4.  
  5.         Me.[HASSAS MALZEME KONTROL].Visible = False
  6.  
  7. End If
  8.  
  9.     If [KARISABILIR MALZEME KONTROL] = "Tanımsız" Then
  10.  
  11.         Me.[KARISABILIR MALZEME KONTROL].Visible = False
  12.  
  13. End If
  14.  
  15.     If [KIRILGAN MALZEME KONTROL] = "Tanımsız" Then
  16.  
  17.         Me.[KIRILGAN MALZEME KONTROL].Visible = False
  18.  
  19. End If
  20.  
  21.     If [RAF OMURLU MALZEME KONTROL] = "Tanımsız" Then
  22.  
  23.         Me.[RAF OMURLU MALZEME KONTROL].Visible = False
  24.  
  25. End If
  26.  
  27. End Sub





  Bul
  Alıntı
Bu mesajı beğenenler:
emreaslan
Aktif Üye 40-100

*
Kayıt Tarihi: 29.06.2012
Toplam 17 konu açtı.
Toplam 89 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2003,
Beğeniler: 0 / 0
#3
03-11-2012, 22:31
Sayın 59_34 yardımınız için teşekkür ederim.Yapmak istediğim şekilde düzenlemişsiniz.Bir de eğer bu 4 alanımdaki sonuç tanımsız ise ben ID alanımın güncelleştirme sonrasında beni ID TANIM YONLENDIRME formumu açmamasını ama alanlardan biri bile tanımlı ise formu açmasını sağlayamıyorum bu konuda bir fikriniz varsa ve paylaşırsanız sevinirim.Yardımınız için tekrar teşekkürler.



  Bul
  Alıntı
Bu mesajı beğenenler:
iscinar
Kıdemli Üye >1000

*
Kayıt Tarihi: 21.08.2010
Toplam 48 konu açtı.
Toplam 1.147 yorum yaptı.
Toplam 7 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2007 TR, Office 2010 TR, Office 2013 TR,
Beğeniler: 0 / 2
#4
03-11-2012, 22:46
Aşağıdakiyle değiştirebilirsiniz
Visual Basic
  1. Private Sub Form_Load()
  2.  
  3. If [HASSAS MALZEME KONTROL] = "Tanımsız" And [KARISABILIR MALZEME KONTROL] = "Tanımsız" And [KIRILGAN MALZEME KONTROL] = "Tanımsız" And [RAF OMURLU MALZEME KONTROL] = "Tanımsız" Then
  4.  
  5. DoCmd.Close acForm, "ID TANIM YONLENDIRME"
  6.  
  7. Else
  8.  
  9.     If [HASSAS MALZEME KONTROL] = "Tanımsız" Then
  10.  
  11.         Me.[HASSAS MALZEME KONTROL].Visible = False
  12.  
  13. End If
  14.  
  15.     If [KARISABILIR MALZEME KONTROL] = "Tanımsız" Then
  16.  
  17.         Me.[KARISABILIR MALZEME KONTROL].Visible = False
  18.  
  19. End If
  20.  
  21.     If [KIRILGAN MALZEME KONTROL] = "Tanımsız" Then
  22.  
  23.         Me.[KIRILGAN MALZEME KONTROL].Visible = False
  24.  
  25. End If
  26.  
  27.     If [RAF OMURLU MALZEME KONTROL] = "Tanımsız" Then
  28.  
  29.         Me.[RAF OMURLU MALZEME KONTROL].Visible = False
  30.  
  31. End If
  32. End If
  33.  
  34. End Sub





  Bul
  Alıntı
Bu mesajı beğenenler:
emreaslan
Aktif Üye 40-100

*
Kayıt Tarihi: 29.06.2012
Toplam 17 konu açtı.
Toplam 89 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2003,
Beğeniler: 0 / 0
#5
03-11-2012, 23:01
Sayın 59_34 yardımınız için çok teşekkür ederim.



  Bul
  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
access-sql-2 [FORM] Liste kutusu biçimlendirme... rafetgulmez 7 4.120 28-11-2025, 13:18
Son Mesaj: osman06
  [FORM] Gmaile Etiket Oluşturma Access Ziyaretçisi 90 4.258 27-09-2024, 13:55
Son Mesaj: Access Ziyaretçisi
  [FORM] Metin Kutusundaki Değeri Başka Bir Metin Kutusuna Aktarmak TheREDROSE 2 424 02-08-2024, 11:56
Son Mesaj: TheREDROSE
  [FORM] metin kutusu kaydırma onkay 5 2.361 27-12-2023, 13:24
Son Mesaj: dsezgin
  Rapor üzerinde önizleme öncesi Etiket Ve Metin Kutularının Yerlerini Değiştirme Hk. adnnfrm 4 522 26-12-2023, 03:42
Son Mesaj: adnnfrm
  Metin Kutusu Adı Değiştirme Hk. snapper 9 787 08-11-2023, 01:12
Son Mesaj: dsezgin
  Etiket Isimlerini Toplu Değiştirme hedefkaya 1 349 24-10-2023, 21:06
Son Mesaj: dsezgin
  [TABLO] çoklu Birleşik Giriş Kutusu RASİMPEH 2 487 19-09-2023, 04:53
Son Mesaj: RASİMPEH

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi