24-05-14, 11:21 AM
هذا الأكواد بعد التعديل لنفس مثالك :
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'اقل من تاريخ اليوم
For i As Integer = 0 To Me.DataGridView1.RowCount - 1
If Me.DataGridView1(1, i).Value.ToString() <= Date.Now.AddDays(-1) Then
Me.DataGridView1.Rows(i).DefaultCellStyle.BackColor = Color.Red
End If
Next
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
' المطلوب
' يحدد على التواريخ القريبة من التاريخ الان بحيث لاتتجاوز عن 30 يوم
For i As Integer = 0 To Me.DataGridView1.RowCount - 1
If Me.DataGridView1(1, i).Value.ToString() < Date.Today.AddDays(-30) Or Me.DataGridView1(1, i).Value.ToString() > Date.Today.AddDays(30) Then
Me.DataGridView1.Rows(i).DefaultCellStyle.BackColor = Color.Red
End If
Next
End Sub
