Vb.net 列表框项目背景色

Vb.net 列表框项目背景色,vb.net,listbox,listboxitems,Vb.net,Listbox,Listboxitems,首先,我需要一个答案()来做下一个新的问题 阅读上面的链接。我在这里解释了一切。 我想给获得Catch的商品的背景上色,这样我就知道其他类型中不存在什么产品 正在做的是绘制所有的列表框 我在表单3: 以下是正在运行程序的图像(已编辑): 我认为这不是最好的做事方法。虽然这可以解决你的问题 Dim currentList as Object Try currentList = Form2.ListBox1

首先,我需要一个答案()来做下一个新的问题

阅读上面的链接。我在这里解释了一切。

我想给获得
Catch
的商品的背景上色,这样我就知道其他类型中不存在什么产品

正在做的是绘制所有的
列表框

我在表单3:

以下是正在运行程序的图像(已编辑):


我认为这不是最好的做事方法。虽然这可以解决你的问题

Dim currentList as Object
            Try
                currentList = Form2.ListBox1
                ListBox1.Items.Add(dt.Rows(i).Item(0))
                currentList = Form2.ListBox2
                ListBox2.Items.Add(dt.Rows(i).Item(1))
                currentList = Form2.ListBox3
                ListBox3.Items.Add(dt.Rows(i).Item(3))
                currentList = Form2.ListBox4
                ListBox4.Items.Add(dt.Rows(i).Item(5))
                currentList = Form2.ListBox5
                ListBox5.Items.Add(Form2.ListBox5.Items.Item(i))
                currentList = Form2.ListBox6
                ListBox6.Items.Add(ListBox4.Items.Item(i) * ListBox5.Items.Item(i))
            Catch ex As Exception
                currentList.BackColor = Color.Yellow
            End Try

它照罐头上说的做。你要求画整个列表框,它画了所有的东西

我建议使用DataGridView而不是ListBox。如果设置:

Me.DataGridView1.SelectionMode = DataGridViewSelectionMode.FullRowSelect
Me.DataGridView1.MultiSelect = False
它的外观和行为与列表框非常相似。然后可以设置:

Me.DataGridView1.row(ir).DefaultCellStyle.BackColor = Color.LightSalmon

这样就可以毫无困难地画出每一行

为什么不在设置值时绘制每个列表框的背景呢?那么那些没有上漆的(白色)意味着错误发生在那一点上?但我只想画一个有错误的。这样我就可以看到丢失的产品是什么了。你能消除由blockquote引起的横幅效应吗?thanksIt无法解决前面的问题。绘制了表格3的所有
列表框1
。我想画表单2中的
列表框。
Me.DataGridView1.row(ir).DefaultCellStyle.BackColor = Color.LightSalmon