[ناجي إبراهيم]

السلام عليكم...

يمكنك الوصول إلى المكونات بالاسم (كـ String) عن طريق الخاصية Controls التابعة للـ Form. مثلاً:

كود :

I = 1000

MsgBox Me.Controls([color=#800080]"Text" & CStr(I)[/color]).Text

و إذا كان المكون جزءاً من مصفوفة مكونات (Control Array) فإنه يمكن الوصول إليه بتحديد رقمه في المصفوفة (الـ Index) بعد قوس الخاصية Controls. مثلاً إذا كانت لدينا مصفوفة مكونات مربعات نص اسمها txtMyData1 تصم 10 مربعات (0 - 9) و مصفوفة مكونات أخرى باسم txtMyData100 و بها 20 مربع نص (0 - 19) فإنه يمكننا الوصول إلى مربع النص رقم 12 في المصفوفة الثانية txtMyData100 كالتالي:

كود :

I = 100
S = 12

MsgBox Me.Controls([color=#800080]"txtMyData" & CStr(I)[/color])[color=#0000CD](S)[/color].Text

نرجو الاستفادة و السلام.