هذا الكود هو عبارة عن ترقيم تلقائي لحقول الفلكس جريد
كيف اجعل الترقيم يكون لنتائج البحث المعروضة فلو عرضت نتائج البحث 10 اصناف يعرضها في الفلكس مرقمة من 1 - 10
Dim i As Integer i = 0 FLEX1.Rows = 1 Do Until RS.EOF i = i + 1 FLEX1.Rows = i + 1 FLEX1.TextMatrix(i, 0) = i
