مشکل با حلقه For

[bahman2012 13]

سلام 

فرض کنید من 64 تا دکمه دارم   و میخام Visible  این دکمه ها رو با کد نویسی برابر با false  قرار بدم

اینکه بیام  visible  رو برابر با false قرار بدم کلی کد باس بنویسم اما من میخام فقط با حلقه for این کار رو انجام بدم

 

مشکل اینجاست که دکمه ها بصورت 

Private Button1 As Button

Private Button2As Button

Private Button3 As Button

Private Button4 As Button

Private Button5 As Butto

ووو....

.

 هست و بلد نیستم تو for قرار بدم

For i = 0 To 60
Button????? .visible = False
Next

-----------------------------------------------------------------------------------------------------------------------------------------------------------------

 

سوال بعدی اینکه فرض کنید یه دکمه تو یه اکتیویتی دارم و حالا  میخام تو یه تابع تک تک ئکمه ها رو فراخونی کنم و یه عملیلتی روشون پیاده کنم  اینجوریییییییییی

Sub fun(btn As ???)
btn1_Click.color =Colors.Red
End Sub

جای علامت سوال چی بزارم که بتونم مثلا دکمه  private button1 as button   یا   private button2 as button    رو توش فراخونی کنم

[محمد احمدی 70]

سلام روست عزیز

فک کنم شما ی خورده بیشتر باید روی بحث آرایه ها کار کنید.

وقتی ی حلقه ایجاد میکنید ینی این حلقه به همون تعداد اجرا میشه و شما بایستی دکمتون رو به این شکل تعریف کنید : 

Dim btn(64) as button



for i = 0 to 64

btn(i).Enabled = False

[bahman2012 13]

اینو میدونم برا همین پرسیدم چه راهکاری برای دکمه هایی که  به اون صورت هست میشه رو حلقه پیاده کرد؟

[پژمان نیکروان 6,055]

اینو میدونم برا همین پرسیدم چه راهکاری برای دکمه هایی که  به اون صورت هست میشه رو حلقه پیاده کرد؟

سلام

 

اگه این دکمه روی اکتیویتی لود شدن برای InVisible کردن همشون میتونید تمام ویو های روی اکتیویتی رو بگیرید و شرط بذارید اگه باتن بود غیرفعالشون کنه.

For Each v As View In Activity.GetAllViewsRecursive
	If v Is Button Then
		v.Visible=False
	End If
Next