تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيفية منع التكرار فى اداة Flexcell grid ؟
#1
السلام عليكم ورحمة الله وبركاته

كيف حالكم ياشباب اتمنى ان تكونوا بخير ان شاء الله

الرجاء كيف يمكننى منع التكرار فى اداة Flexcell grid وهذا هو الكود الذى استخدمة لاضافة سطر جديد

كود :
Grid1.AddItem  Text1.text

اريد تعديل هذا الكود بيحث يتحقق بان الاسم غير موجود فى الجريد فيقوم باضافتة واذا كان موجودا فيقوم باظهار رسالة تفيد انه موجود ولا يمكن اضافتة مرة اخرى

انتظر مساعدتكم

وشكرا لكم وبارك الله فيكم جميعا
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم

- أهلا بك في المنتدى . بالنسبه لطلبك أعتقد أنك تقصد أداة MSFlexGrid . ولفترض أن عمود الإسم هو العمود الأول لذلك سيكون ترتيبه هو صفر حيث أن ترتيب الأعمدة يبدأ من الصفر . ولنفترض أنه يوجد صف لعناوين الأعمدة . لذلك سيكون الكود الذي تريده كالتالي :-

Dim I As Integer

كود :
IF MSFlexGrid1.Rows >1 Then

For I = 1 To MSFlexGrid1.Rows -1

IF Trim$(Text1.Text)=Trim$(MSFlexGrid1.TextMatrix(I,0)) Then
Msgbox "الاسم موجود"
Exit Sub
End IF

Next

MSFlexGrid1.AddItem Trim$(Text1.Text)

End IF
الرد }}}}
تم الشكر بواسطة:
#3
السلام عليكم ورحمة الله وبركاته

كنت اقصد اداة شبة اداة MSFlexGrid والحمد لله الطريقة ايضا نفعت معاها

شكرا لك وبارك الله فيك ورزقك من واسع علمة
الرد }}}}
تم الشكر بواسطة:
#4
مشكورين يا جماعة
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  الغاء التكرار m-kaylani 6 222 07-08-16, 03:54 PM
آخر رد: Ahmed_Mansoor
  وجدت مشروع على اداة Treeview algroob 5 1,078 31-05-16, 04:45 PM
آخر رد: طه القدسي
  [vb6.0] مشكلة مع اداة ocx chaabane 3 242 08-12-15, 05:24 PM
آخر رد: chaabane
  [vb6.0] مشكلة مع اداة ocx chaabane 1 182 08-12-15, 03:32 PM
آخر رد: Rahf Azezi
  [سؤال] كيفية ربط VScroll1 بعجلة الماوس Ahmed Gandos 1 402 25-09-15, 06:15 AM
آخر رد: أبو عمر
  [سؤال] مشكله فى اداة Calendar aboezzat84 4 540 22-08-15, 10:06 AM
آخر رد: aboezzat84
  [vb6.0] كيفية تنفيذ كود مكتوب داخل اداة textbox ghost_programmer 6 1,160 03-06-15, 05:48 PM
آخر رد: ghost_programmer
  اداة يتم الكتابة عليها مثل الدتا للجريد magic200100 4 722 02-04-15, 11:18 PM
آخر رد: ahmedabdelaliem
  من فضلكم اريد اداة XP COMMAND BUTTON.OCX الخاصة بي WIN7 64BIT chaabane 3 762 28-02-15, 04:19 PM
آخر رد: InJuries
  كيفية حذف سطور من msflexgrid ؟ gedo 0 469 18-11-14, 07:03 PM
آخر رد: gedo

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم