تقييم الموضوع :
  • 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 278 07-08-16, 03:54 PM
آخر رد: Ahmed_Mansoor
  وجدت مشروع على اداة Treeview algroob 5 1,153 31-05-16, 04:45 PM
آخر رد: طه القدسي
  [vb6.0] مشكلة مع اداة ocx chaabane 3 285 08-12-15, 05:24 PM
آخر رد: chaabane
  [vb6.0] مشكلة مع اداة ocx chaabane 1 218 08-12-15, 03:32 PM
آخر رد: Rahf Azezi
  [سؤال] كيفية ربط VScroll1 بعجلة الماوس Ahmed Gandos 1 443 25-09-15, 06:15 AM
آخر رد: أبو عمر
  [سؤال] مشكله فى اداة Calendar aboezzat84 4 604 22-08-15, 10:06 AM
آخر رد: aboezzat84
  [vb6.0] كيفية تنفيذ كود مكتوب داخل اداة textbox ghost_programmer 6 1,285 03-06-15, 05:48 PM
آخر رد: ghost_programmer
  اداة يتم الكتابة عليها مثل الدتا للجريد magic200100 4 753 02-04-15, 11:18 PM
آخر رد: ahmedabdelaliem
  من فضلكم اريد اداة XP COMMAND BUTTON.OCX الخاصة بي WIN7 64BIT chaabane 3 839 28-02-15, 04:19 PM
آخر رد: InJuries
  كيفية حذف سطور من msflexgrid ؟ gedo 0 490 18-11-14, 07:03 PM
آخر رد: gedo

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


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