Gridview Changer la couleur de fond basée sur la date

Question

Je voudrais changer la couleur d'arrière-plan sur ma grille en fonction de la date actuelle. Le code ci-dessous fonctionne, mais la date future qui sera coloriée en bleu commence deux jours plus tard au lieu de 1 jour qui est demain. Ai-je manqué quelque chose dans le code ou devrait-il être modifié différemment? .

If e.Row.RowType = DataControlRowType.DataRow Then 
        Dim data As DateTime = Convert.ToDateTime(DirectCast(e.Row.DataItem, DataRowView)("Date").ToString()) 
        Dim diff As TimeSpan 
        diff = DateTime.Now.Subtract(data) 
        Dim days As Integer = diff.Days 
        'Yellow = past date/White = current date/Blue = future date 
        If days > 0 Then 
         e.Row.BackColor = Drawing.ColorTranslator.FromHtml("#FFFFBB") 'past date' 
        ElseIf days < 0 Then 
         e.Row.BackColor = Drawing.ColorTranslator.FromHtml("#BAD8FF") 'future date' 
        ElseIf days = 0 Then 'present date 
         'do nothing 
        End If 
       End If

Answer 1

Vous pouvez utiliser la propriété Date de DateTime qui tronque le temps:

Dim data = DirectCast(e.Row.DataItem, DataRowView) 
Dim day As Date = data.Row.Field(Of Date)("Date").Date 
Dim daysDiff As Int32 = (Now.Date - day).Days