تغییر دادن یک خاصیت برای گروهی از ابزار ها. VB.net

[feri_sharp]

سلام دوستان عزیز.
به کد زیر توجه کنید مثلا ما 3 تا label تعریف کردیم که می خوایم خاصیت Visible رو برای همشون داخل کد False کنیم.
label1.visible=false
label2.visible=false
label3.visible=false
خوب سوال من اینه که چجوری میشه که بدون اینکه اینجوری بنویسیمشون (تک تک) با یه کد کوتاه تر همشون رو باشم خاموش کنیم. فرض بگیری که مثلا تعداد Label ها زیاد باشه.
میشه یه گروه ازشون درست کرد ؟ منظورم Groupbox نیست.

[dll9095]

با این کد میشه این کار رو انجام داد تو میتونی به جای Label هر کنترل دیگه رو قرار بدی

For Each c As Control In Me.Controls
If TypeOf c Is Label Then
c.Text = ""
End If
Next

[feri_sharp]

ممنون از جوابتون این جواب 64 خط از برنامم کم میکنه.
خوب حالا یه سوال دیگه آیا میشه ؟ که مجموعه ای از متغیر های Bool رو هم مقدارشون رو با هم عوض کرد؟ اگر جواب ابن رو هم بدین 128 خیط از برنامم کم میکنه.
ممنون

[anti206]

سلام دوست عزیز. انجام این کار برروی متغییر ها تاجایی که میدونم امکان پذیر نیست اما با استفاده از آرایه ها به راحتی میتونید این کار رو انجام بدید:

یک آرایه به نام testarr که دارای 128 خانه هست تعریف کردم و در یک حلقه به تک تکشون مقدار True دادم:

Dim testarr(127) As Boolean
For i = 0 To 127
testarr(i) = True
Next


موفق باشید!