Pb Datagrid, cellule comparait à une autre, s'afficherai en noir ou en rouge

2 réponses

Daniel

23/12/2004 à 13:31

Bonjour,

Je travail en VB ave une base de donnée SQL

Je recherche a faire apparaître dans une cellule de mon datagrid une
information qui comparait à une autre, s'afficherai en noir ou en rouge.

Pour exemple : si le prix de vente d'un produit et inférieur au prix
d'achat, le prix de vente de mon produit doit apparaître en rouge.

Id_Produit / Nom / Achat / Vente

1 / vélo / 123 / 125(en noir)

2 /trottinette /50/48(en rouge)

Je vous remercie par avance de toutes informations qui seront susceptible de
m'aider.

Cordialement,

Daniel

2 réponses

Vko

23/12/2004 à 14:41

Une solution parmis d'autres :

Dans l'évènement ItemDataBound :

private sub DataGrid1_ItemDataBound (sender as object, e as
DataGridItemEventArgs) handles DataGrid1.ItemDataBound

If e.Item.ItemType = ListItemType.Item OrElse e.Item.ItemType =
ListItemType.AlternatingItem Then
Dim achat as double = CDbl(DataBinder.Eval (e.Item.DataItem, "Achat"))
Dim vente as double = CDbl(DataBinder.Eval (e.Item.DataItem, "Vente"))
If achat > vente Then
e.Item.BackColor = Color.Red
End If
End If

end sub

Daniel

23/12/2004 à 15:11

Merci beaucoup.

Cordialement

Daniel

"Vko" a écrit dans le message de news:

Une solution parmis d'autres :

Dans l'évènement ItemDataBound :

private sub DataGrid1_ItemDataBound (sender as object, e as
DataGridItemEventArgs) handles DataGrid1.ItemDataBound

If e.Item.ItemType = ListItemType.Item OrElse e.Item.ItemType > ListItemType.AlternatingItem Then
Dim achat as double = CDbl(DataBinder.Eval (e.Item.DataItem, "Achat"))
Dim vente as double = CDbl(DataBinder.Eval (e.Item.DataItem, "Vente"))
If achat > vente Then
e.Item.BackColor = Color.Red
End If
End If

end sub

Pb Datagrid, cellule comparait à une autre, s'afficherai en noir ou en rouge

2 réponses

Veuillez sélectionner un problème