vb.net的datagridview如何让表格根据表格数据来改变颜色,如值为1时表格为红色,2时为蓝色

谢谢
2025-02-26 13:59:41
推荐回答(2个)
回答1:

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        Dim 数据表 As New DataSet()

        数据表.Tables.Add()

        Dim aa As DataTable = 数据表.Tables(0)

        aa.Columns.Add("lb")

        aa.Rows.Add("a")

        aa.Rows.Add("b")

        Dim biaoge As DataGridView = New DataGridView

        biaoge.Parent = Me

        biaoge.Location = New Point(10, 46)

        biaoge.DataSource = aa

        TextBox1.Text = biaoge.ColumnCount.ToString + "列"

        TextBox1.Text += " " + biaoge.Columns.Count.ToString

        表格控件颜色控制(biaoge, 1)

    End Sub

    Sub 表格控件颜色控制(表格控件 As DataGridView, 参数 As Int16)

        Dim 行数 As Int16 = 表格控件.Rows.Count - 1

        Do

            '表格控件.Rows(行数).DefaultCellStyle.BackColor = IIf(参数 = 行数 Mod 2, Color.AliceBlue, Color.Beige)

            表格控件.Rows(行数).Cells(0).Style.BackColor = IIf(参数 = 行数 Mod 2, Color.AliceBlue, Color.Beige)

            行数 -= 1

        Loop While (行数 >= 0)

    End Sub

这是个例子,其他的自己去修改.

回答2:

datagridview的RowPostPaint事件中写相关代码