منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

السلام عليكم احبائي الاعزاء 
السؤال واضح من العنوان اريد تلوين صف معين في الداتا قريد فيو حسب قيمه نصية معينه وليست رقمية . جربت شروحات ولكن جميعها ذات قيم رقمية اصغر من او اكبر او تواريخ .
ارجو المساعدة

ضع الكود يللى عندك بتقول انه للقيم اللرقميه للتعديل عليه

هلا اخي بلدي اتفضل كود للتواريخ
وانا اريد لقيمه نصية معينة او كلمة معينة


Dim kk As Date = Now.ToString("yyyy/MM/dd")
For i As Integer = 0 To DataGridView1.Rows.Count - 1
If DataGridView1.Rows(i).Cells(7).Value < kk.AddDays(-90) Then
DataGridView1.Rows(i).DefaultCellStyle.BackColor = Color.Red
End If
Next

(08-08-20, 11:39 PM)العطر الرايق كتب : [ -> ]هلا اخي بلدي اتفضل كود للتواريخ
وانا اريد لقيمه نصية معينة او كلمة معينة


Dim kk As Date = Now.ToString("yyyy/MM/dd")
     For i As Integer = 0 To DataGridView1.Rows.Count - 1
       If DataGridView1.Rows(i).Cells(7).Value < kk.AddDays(-90) Then
      DataGridView1.Rows(i).DefaultCellStyle.BackColor = Color.Red
        End If
         Next

هلا فيك اخى

تفضل التعديل هذا يقارن مساواه بالنص

لم يعمل اخي

(09-08-20, 01:03 AM)العطر الرايق كتب : [ -> ]لم يعمل اخي

لابد من تطابق الاحرف اذا كانت احرف كبيره او صغيره او في بدايتها او نهايها توجد مسافات

لتجاوز المسافاات ممكن عمل trim قبل المقانه
If DataGridView1.Rows(i).Cells(7).Value.tostring.trim.Equals("data") Then

---

او ض مشروع صغير

يعمل مع النصوص الانجليزية اريد العربية اذ امكن شاكر لك مجهودك

(09-08-20, 01:07 AM)العطر الرايق كتب : [ -> ]يعمل مع النصوص الانجليزية اريد العربية اذ امكن شاكر لك مجهودك

يعمل مع الجميع

لكن ضع مشروع صغير

---

واضح انه عندك مشكله في الاحرف العربيه يجب ان تنتبه اليها

لهذا الافضل مقارنه رقيمه برقم id الخاص بالمجموعه لتتجاوز اخطاء الاحرف

اشكرك من اعماق قلبي اخي تم عمل الكود تمام . نسيت اغير رقم الخلية Cells في الكود وغيرتها ونجح . مشكوووور مجدداً