İsimleri Ayırma

1 2 3 4
08/10/2019, 00:01

zaferlacin

formda 100 civarında metin kutusu var metin kutularının kontrolü problem yaratıyor
Me.Controls("metin" & x + 1) = DiziIsimBol(x)
metin1 metin2 başka amaçlarla kullanılıyor
08/10/2019, 00:15

berduş

ozaman sadece ilgi metin kutularına ve etiketlerine özel bir isim verin
siz en fazla 6 tane olur demiştiniz, ben önlem olsun diye 10 yapmıştım
bu 10 metin ve etiket kutusunun ismi GizAd1,GizAd2...….GizAd10
etiketlerinin ismi de GizEt1...…………………….gizet10 olsun
Me.Controls("GizAd" & x + 1).Visible = True
Me.Controls("GizEt" & x + 1).Visible = True
Me.Controls("GizAd" & x + 1) = DiziIsimBol(x)
şeklinde değiştirebilirsiniz yada uzun uzun her metin ve etiket kutularının tek tek yazabilirsiniz?
08/10/2019, 20:03

zaferlacin

bir nebze işimi görüyor
metin kutusu yerine değişken tanımlayarak yapabilirmiyiz
dim a, a1,a2 as string
Me.Controls(a & x + 1) = DiziIsimBol(x)

gibi
08/10/2019, 20:23

berduş

(08/10/2019, 20:03)zaferlacin yazdı: Me.Controls(a & x + 1) = DiziIsimBol(x)
Bu şekilde olmaz ama zaten diziIsimBol değişken olarak kullanilabilr
09/10/2019, 22:53

zaferlacin

(08/10/2019, 20:23)berduş yazdı:
(08/10/2019, 20:03)zaferlacin yazdı: Me.Controls(a & x + 1) = DiziIsimBol(x)
Bu şekilde olmaz ama zaten diziIsimBol değişken olarak kullanilabilr
hocam yapmak istediğim örnek ekte isimleri 3 ile sınırladım

incelerseniz sevinirim teşekkürler
09/10/2019, 23:07

berduş

zafer bey 6. mesajda kullandığımız yöntemi neden kullanmıyoruz ben onu anlamadım.
tamam isimlendirme sorunluydu ama verilecek özel isimlerle zaten görünür yapıp değer atayabiliyorduk
burada yapılmasını istediğiniz şeyi orada da zaten yapabiliyorduk
1 2 3 4