13-05-13, 04:53 PM
السلام عليكم
- إذا كان قصدك إنك تبحث عن نص موجود في عمود معين في أداة ال MSFlexGrid1 ، وليكن العمود الأول والذي سيكون رقم ترتيبه هو صفر ، ولنفترض أن نص البحث موجود في تكست1 :
- إذا كان قصدك إنك تبحث عن نص موجود في عمود معين في أداة ال MSFlexGrid1 ، وليكن العمود الأول والذي سيكون رقم ترتيبه هو صفر ، ولنفترض أن نص البحث موجود في تكست1 :
كود :
Dim I As Integer
For I = 1 To MSFlexGrid1.Rows -1
IF Trim(Text1.Text) = MSFlexGrid1.TextMatrix(I,0) Then
Msgbox "تم العثور على نتيجة"
Exit Sub
End IF
Next
Msgbox "لم يتم العثور على نتيجة"