Change color of a Row when VB .Net expires

3

I have a database with the following tables: Data Emissão and Data Expira .

So I want that when the date of Data expira is equal to or greater than Data Emissao , row change color to Vermelho and when it's 1 month to reach the date change color to Amarelo .

My codes

Private Sub CadastroDataGridView_CellFormatting(sender As Object, e As DataGridViewCellFormattingEventArgs) Handles CadastroDataGridView.CellFormatting
    If Me.CadastroDataGridView.Columns(e.ColumnIndex).Name = "DataGridViewTextBoxColumn15" Then
        If e.Value IsNot Nothing Then
            Dim dgvdate As Date = CDate(e.Value)
            If dgvdate < CDate(Now) Then
                e.CellStyle.BackColor = Color.Red
                e.FormattingApplied = True
            Else
                e.CellStyle.BackColor = Color.Green
                e.FormattingApplied = True
            End If

        End If
        End If
End Sub
    
asked by anonymous 29.04.2015 / 20:36

1 answer

1

I did not test, but should work:

Dim data_addmes As Date = Date.Now.AddMonth(1)
Dim data_expira As Date = dgvRow.Cells("Data_expira").Value
Dim data_emissa As Data = dgvRow.Cells("Data_Emissao").Value

If data_addmes >= data_expira Then
    dgvRow.DefaultCellStyle.BackColor = Color.Yellow
Else If data_expira >= data_expira Then
   dgvRow.DefaultCellStyle.BackColor = Color.Red
End If
    
29.04.2015 / 21:58