تقييم الموضوع :
  • 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
مشكورين يا جماعة
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيفية عمل علامة X عوض True في تكتست True/False بتقرير الكريستال ريبورت 8.5 amazonette 2 1,771 28-12-19, 01:50 PM
آخر رد: amazonette
  كيفية حماية قاعدة البيانات على الشبكة المحلية من النسخ والحذف abu jana 8 6,912 07-08-19, 11:04 PM
آخر رد: sendbad100
  كيفية تشغيل برنامج مبرمج ب vb6على ويندوز 10 new_programer 2 3,794 19-12-18, 01:21 AM
آخر رد: elgokr
  كيفية البحث وعمل فلتر للبيانات داخل Mysql ؟ gedo 2 2,169 07-11-18, 05:53 PM
آخر رد: gedo
  [مثال] كيفية تحويل ملف تنفيذي vb6 إلى كود مصدري salahoskar1 1 2,217 11-03-18, 02:17 AM
آخر رد: Ahmed_Mansoor
  اذا نسخت نص من ملف نصي والصقته في اداة List تظهر علماتا استفهام مهما غير من ترميز الم سعود 3 2,273 18-11-17, 11:14 AM
آخر رد: sendbad100
  [سؤال] كيفية معالجة مشكلة ظهور اللغة العربية على شكل رموز Emad Nashaat 1 3,356 08-06-17, 05:16 AM
آخر رد: Amir_Alzubidy
  [سؤال] برجاء المساعدة - كيفية عمل صفحة التعريف بالبرنامج عبد الرحمن على 11 4,400 30-04-17, 01:20 AM
آخر رد: عبد العزيز البسكري
  [vb6.0] استفسار عن كيفية اغلاق فورم في حال لم يوجد فيه بيانات فيجوال 0.6 عمر سالم 4 3,034 26-01-17, 03:37 PM
آخر رد: عمر سالم
  الغاء التكرار m-kaylani 6 2,820 07-08-16, 03:54 PM
آخر رد: Ahmed_Mansoor

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


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