none
changer la couleur d'un bouton datagridview vb .net RRS feed

  • Question

  • bonjour

     j’ai réussi la manipulation des boutons dans une colonne datagridview mais j’ai essaye de changer la couleur de fond du bouton je n'y arrive pas qui peut m’aider voici mon code

    un grand merci d'avance

    Public Class Form1 Dim valeurchoisie As Object Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load DataGridView1.RowCount = 8 DataGridView1.ColumnCount = 5 DataGridView1.Columns(0).Name = "produit" DataGridView1.Columns(1).Name = "quantité" DataGridView1.Columns(2).Name = "energiet" DataGridView1.Columns(3).Name = "glucides" DataGridView1.Columns(4).Name = "sucres" Dim calculs As New DataGridViewButtonColumn() calculs.Name = "calculs" DataGridView1.Columns.Add(calculs) DataGridView1.Rows(4).Cells("calculs").Value = "calcul energie" Me.DataGridView1.Rows(4).Cells("calculs").Style.BackColor = Color.Red End Sub Private Sub DataGridView1_CellClick(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellClick If e.ColumnIndex = 5 Then Dim quantite_energie As Double = (Val(Me.DataGridView1.Rows(4).Cells.Item(1).Value) * Val(Me.DataGridView1.Rows(4).Cells.Item(2).Value)) / 1000 MessageBox.Show("quantité réeelle énergie =" & quantite_energie) MsgBox("un autre calcul", MsgBoxStyle.YesNo) Dim resultat As String = MsgBox("un autre calcul", MsgBoxStyle.YesNo) If resultat = vbYes Then Me.DataGridView1.Rows(4).Cells("calculs").Value = "calcul glucides" Me.DataGridView1.Rows(4).Cells("calculs").Style.BackColor = Color.Blue ElseIf resultat = vbNo Then Me.DataGridView1.Rows(4).Cells("calculs").Value = "calcul energie" Me.DataGridView1.Rows(4).Cells("calculs").Style.BackColor = Color.Red End If End If

    end class


    vendredi 1 juillet 2016 10:09

Réponses

  • Changez le style du button en Flat ou PopUp style:

     Dim calculs As New DataGridViewButtonColumn()
            calculs.Name = "calculs"
            calculs.FlatStyle = FlatStyle.Flat
            calculs.Text = "Calcul Energie"

    • Marqué comme réponse SIMONGEORGES vendredi 1 juillet 2016 21:22
    vendredi 1 juillet 2016 11:04

Toutes les réponses