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

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

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


评论 1
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值