etiketleri topluca görünür yapma
Tarih
25/03/2009 17:40
Konu Sahibi
accessman
Yorumlar
7
Okunma
3242
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
accessman

Kullanici Avatari
Onursal
2.367
31/10/2008
425
Denizli
Ofis 2003
20/09/2016,00:20
Çözüldü 
iyi günler arkadaşlar
bir formumuz var diyelim
bunda 20-30 tane etiketvar
etiket1
etiket2
..
..
etiket30
bir metin5 kutusundaki değere göre bunların topluca görünüp gizlenmesini nasıl sağlarız yani mesala değer 15 ,18 ,22 olduğunda görünecek
5, 8,12 olduğunda gizlenecek
acaba şöyle olabilirmi
----------------------------
if metin5= 15 then
for a=1 to 30
etiket(a).visible=true
next
end if
-----------------------
yardımlarınız iiçin teşekkürler
Cevapla

Seruz
Uzman
Kullanici Avatari
Uzman
S.... U....
1.550
7
30/10/2008
814
Tekirdağ
Ofis XP
28/05/2017,22:33
Çözüldü 
Sponsor Reklam
Sn. Accessman,
Örnek bir form yapıp gönderseniz de biz de onun üzerinden göstersek,
yeni bir mdb yaratıp, yeni bir form yapıp, üzerine sıralı isimli Etiketler koyup,
bir de üzerine kod yazıp denemek için vakit harcamasak,
işimiz daha kolay olmaz mı?

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub Girilen_Deger_AfterUpdate()
Dim i
    Select Case Me.Girilen_Deger
        Case 15, 18, 22
            For i = 1 To 10
                Me("[Etiket" & i & "]").Visible = True
            Next
        Case 5, 8, 12
            For i = 1 To 10
                Me("[Etiket" & i & "]").Visible = False
            Next
        Case Else
            'Yukarıdaki sayılar haricindeki bir değer olduğunda ? ....
    End Select
End Sub


Verdiğim yöntemde etiket isimleri Etiket1....30 gibi ardışık olmalı.

Etiketlerdeki Tag özelliği ve For Each fonksiyonu kullanılarak
ardışık olmadan da yapılabilir ama sanırım bu sizin için yeterli.



Ek Dosyalar
.rar   Etiket_Seruz.rar (Dosya Boyutu: 8,37 KB / İndirme Sayısı: 25)
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla

assenucler

Kullanici Avatari
Onursal
A.... S.... Ş....
2.053
31/10/2008
63
İstanbul
-
22/03/2017,13:18
Çözüldü 
Teşekkürler, Seruz hocam...
Cevapla

Krizantem
Cezalı
Kullanici Avatari
Cezalı Üye
27
2
22/03/2009
Adana
Ofis 2003
27/04/2009,09:01
Çözüldü 
Sponsor Reklam
Seruz Hocam
Dim i as byte desek daha mı güzel olur ? Yoksa variant olarak özellikle mi bırakıldı?
Cevapla

Nurullah_Serdar
FaTSaLı
Kullanici Avatari
Aktif Üye
568
22/11/2008
189
Giresun
Ofis 2007
01/07/2013,13:21
Çözüldü 
içinde yapmaya çalıştığının çok daha fazlası ile işine yarayacak etiket yazdırma örneği var. kolay gelsin


Ek Dosyalar
.rar   Contacts.rar (Dosya Boyutu: 2,62 MB / İndirme Sayısı: 21)
İyiki Varsın Access Img-grin
Cevapla

Seruz
Uzman
Kullanici Avatari
Uzman
S.... U....
1.550
7
30/10/2008
814
Tekirdağ
Ofis XP
28/05/2017,22:33
Çözüldü 
Sponsor Reklam
Tabii ki olur ve daha güzel olur.
sadece bu tür ufak örneklerde önemsemiyoruz bu tür ayrıntıları.
Sonuçta örnek olduğu için diğer kodlar önemli burada.
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Sürekli Formda Satırlardaki Onay Kutularını Aktif / Pasif Yapma akif_erdem 10 211 29/03/2017, 18:25 akif_erdem
  Formda Arama Yapma uiakouwr 9 375 20/02/2017, 23:34 ozanakkaya
  sütunlardaki değerleri birbiriyle kombinasyon yapma hbal09 3 236 30/12/2016, 14:23 ozanakkaya
  Sorguda ürün fiyatına indirim yapma Dream41 3 214 23/12/2016, 11:57 Dream41
  kayıtlarda arama yoluyla orantı kurarak hesap yapma mehmetb84 18 764 04/12/2016, 17:13 mehmetb84


Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
DMCA.com Protection Status