[Ahmed_Mansoor]

أهلا أخي الكريم ، طيب كل ما عليك فعله لتحقق ماتريد هو أن تقوم بوضع أرقام من ١ إلى عدد التكستات الموجوده في كل القروبات ضع في خاصية الـ Index في التكست بوكس الأول في القروب١ الرقم ١ ثم التكست بوكس الذي يليه الرقم ٢ وهكذا بالتسلسل إلى آخر تكست بوكس في القروب الأخير ثم بعد ماتنتهي من وضع الأرقام بالتسلسل في خاصية الـ Index لجميع التكستات قم بتغيير إسم كل تكست بوكس في جميع القروبات بإسم واحد موحد وليكن الإسم الموحد هو TXT وكما هو واضح في الصوره يوجد ثلاث قروبات في كل قروب أربع تكست بوكس يعني عدد التكستات كلها ١٢ تكست بوكس ولنفترض أن التكست بوكس الذي هو خارج القروبات الثلاثه والذي يكتب فيه المستخدم النص الذي تريد فحصه هل يطابق محتوى أي تكست بوكس من الموجوده في القروبات الثلاثه نفترض أن إسمه هو Text13 إذا سيكون الكود الذي تحتاجه والذي ستضعه في داخل زر أمر هو كالتالي :

PHP كود :

Dim I As Integer

For I = 1 To 12
       IF Trim$(Text13.Text) = Trim$(TXT(I).Text) Then
            MsgBox "مضبوط"
            Exit Sub
       End IF
Next

MsgBox "لم يتم العثور على نص مطابق في القروبات"