[Zuhare]

PHP كود :

Private Sub DataGridView1_CellFormatting(ByVal sender As Object, ByVal e As DataGridViewCellFormattingEventArgs) Handles DataGridView1.CellFormatting



        For i As Integer = 0 To DataGridView1.Rows.Count - 1


            Dim Column_Date As Object = DataGridView1.Rows(i).Cells(3).Value
            If IsDBNull(Column_Date) Then
                Return
            ElseIf Column_Date < Date.Today.AddDays(10) Then
                DataGridView1.Rows(i).DefaultCellStyle.BackColor = Color.Red
            End If


        Next


    End Sub