أخواني الكرام
السلام عليكــم ورحمـة الله وبركاتــه
لدي ثلاث ملصقات labels وهي :
Me.Label1.Text
Me.Label2.Text
Me.Label3.Text
ما اود فعله هو وضعها في دائرة تكرار بعدد 3 مرات بحيث يأخد كل ملصق رقم التكرار ويمكن عمل هذا الامر بهذا الكود :
For i = 1 To 3 If i = 1 Then Me.Label1.Text = i.ToString ElseIf i = 2 Then Me.Label2.Text = i.ToString ElseIf i = 3 Then Me.Label3.Text = i.ToString End If Next
ولكن ما اريد فعله هو اختصار كتابه الكود بالاستغناء عن الشرط If ووضع الداله Me.Label.Text في متغير بهبذا الشكل :
For i = 1 To 3
Variable = ("Me.Label" + i.ToString + ".Text")
Variable = i.ToString
Nextهذه هي الفكره ولكن كيف اقوم بتنفيذها بشكل صحيح ؟
ولكم كل الشكر والتقدير
