الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

سؤال في اداة الفليكس للخبراء

بدأه نشأت الربيحات في 20 نوفمبر 2012 · 1 رد · 466 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بسم الله الرحمن الرحيم

عندي اداة msflexgarid فيه عدة اسطر اريد كود يحذف سطر معين يتم تحديد السطر عندما يكون البيانات الموجدوة داخل text1.text مشابهة لنفس السطر وايضا اذا كان هناك اكثر من سطر مشابه يتم حذف سطر واحد فقط وشكرا

الرجاء المساعدة العاجلة مع العلم اني استخدمة هذا الكود ولم يعمل

For I = 1 To MSFlexGrid1.Rows - 1

If Val(MSFlexGrid1.TextMatrix(I, 1)) = Val(Text1.Text) Then

(MSFlexGrid1.RemoveItem (MSFlexGrid1.Text

End If

Next

تم تعديل هذه المشاركة بواسطة نشأت الربيحات في 20 نوفمبر 2012 في 21:21

#2
جرب هذا الكود 

Private Sub Command1_Click()

Dim i As Long

For i = 1 To MSFlexGrid1.Rows - 1
If Val(Text1) = MSFlexGrid1.TextMatrix(i, 1) Then
MSFlexGrid1.RemoveItem (i)
Exit For
End If
Next i

End Sub

تم تعديل هذه المشاركة بواسطة Black_Tiger_2007 في 21 نوفمبر 2012 في 10:39

الأفكار العبقرية تأتي بالتعب و المجهود و الإلهام فيها لا يتعدى 1% ( أديسون )

مواضيع مشابهة