ListBox 字体颜色设置
请问能不能在vb6.0中实现
一条lisbox里的文字列 某几个字为红色。
例子：
开始日期 商品名 错误信息
2007/05/24 牛奶 不存在
2007/05/24 花生
能不能把不存在3个字变成红色。？在线等。
[解决办法]
建议楼主用listview控件，不要用listbox
Dim li As ListItem
Dim i As Long
List1.ColumnHeaders.Add , , "开始日期 "
List1.ColumnHeaders.Add , , "商品名 "
List1.ColumnHeaders.Add , , "错误信息 "
For i = 0 To 3
Set li = List1.ListItems.Add(, , i)
li.SubItems(1) = " "
li.SubItems(2) = "不存在 "
li.ListSubItems(2).ForeColor = &HFF&
Next
