[0theghost0]

السلام عليكم

عندي كود البحث عن المتأخرين وتظليلهم بس اعتقد انه يوجد بهم اخطاء عندما اقوم بستخدامهم الاولي يظهر لي الاسماء والثاني يظلل كل الاسماء حتى لو كان الزبون جديد .

فأتمنى التعديل عليهم او اعطائي بديل عنهم

كود اظهار الاسماء المتاخرين بدون تظليل

كود :

For i As Integer = 0 To Me.DataGridView1.RowCount - 1
           If Me.DataGridView1(10, i).Value.ToString() <= Date.Now Then
               Me.DataGridView1.Rows(i).DefaultCellStyle.BackColor = Color.Red
           End If
       Next

اذا امكن ان اجعله يظللهم بالون الاحمر مثل ماهو مذكور يظهر الاسماء بالون الاحمر ولكن لايظهرهم في الحقيقة

الكود الثاني يظلل الاسماء الذين تأخروا اكثر او اقل من 30 يوم

كود :

For i As Integer = 0 To Me.DataGridView1.RowCount - 1
           If Me.DataGridView1(10, i).Value.ToString() < Date.Today.AddDays(-30) Or Me.DataGridView1(10, i).Value.ToString() > Date.Today.AddDays(30) Then
               Me.DataGridView1.Rows(i).DefaultCellStyle.BackColor = Color.Red
           End If
       Next

تأكدوا لي من الاكواد هل هم صحيحين او يوجد بهم اخطاء واذا عندكم اكواد اسهل وافضل لاتبخلوا رحم الله والديكم