استفاده از متغيير به جاي نام كنترل

[Alisalari]

سلام - سوال قبلي منو كه كسي جواب نداد!
اميدوارم اين يكي رو راهنماييم كنين .

ميخوام بدونم چطور ميشه كه توي كد برنامه براي كار كردن روي بعضي كنترلها مثل Labelها به جاي نام اونها از متغيرها استفاده كرد .
مثلا" نام يه كنترل توي يه متغير به نام test ذخيره باشه

"Test="Label1

بعد وقتي بخوام Caption رو تغيير بدم به جاي

"Label1.Caption="Ali

چجوري از متغيرم استفاده كنم .

آخه يه سري كنترل دارم كه اسماشون عدد هست كه ميخوام با متغير شمارنده حلقه هر كدوم رو جداگانه دست بگيرم .

ممنونم .

[Payam Moradi]

Me.Controls("Label1").Caption = "Ali"

 

For i = 0 to 10 

    Me.Controls("Label" & i).Caption = "WWWWWW"

next

 

For i = 0 to 10 

    Me.Controls(i).Caption = "WWWWWW"

next

 

Or ...

Dim c as control

For Each c in me.controls

   if Typeof c is VB.label Then

      C.Caption = "RRRR"

   End if

Next

 

Or ...

For i = 0 to me.controls.count

   if Typeof me.controls(i) is VB.label Then

       Me.Control(i).Caption = "RRRR"

   End if

Next

 

Or ...

For i = 0 to me.controls.count

   if Typeof me.controls(i) is VB.Text Then

       Me.Control(i).Text = "RRRR"

   End if

Next