一个关于listview的问题，请各位帮忙

Question

请问各位，谁知道怎么样才能在listview控件中不同的行设置不同的字体？
在线等，解决问题马上给分

Answer 1

完全可以的嘛：
listview 有FontName属性 
listview .FontName [= font]

Answer 2

Dim lv As ListItem    Set lv = ListView1.ListItems.Add(, , "aa")
    lv.ListSubItems.Add , , "aa1"
    lv.ListSubItems.Add , , "aa2"
    Set lv = ListView1.ListItems.Add(, , "bb")
    lv.ListSubItems.Add , , "bb1"
    lv.ListSubItems.Add , , "bb2"
    Set lv = ListView1.ListItems.Add(, , "cc")
    lv.ListSubItems.Add , , "cc1"
    lv.ListSubItems.Add , , "cc2"
    
    ListView1.ListItems(2).Bold = True
    ListView1.ListItems(2).ForeColor = vbRed
    ListView1.ListItems(3).ListSubItems(1).ForeColor = vbRed

Answer 3

每个位置都有属性
bold
forecolor
FontName 

Answer 4

to 安之：你没有仔细看我的要求，我是要不同的行显示不同的字体，你那样的话就是一个listview中所有的行都是一种字体了。to cuizm:谢谢你的代码。to all:谢谢大家关注我自己在试试看有什么别的方法，其实我想达到的目的是在一个listview（report方式）中可以显示一些商品信息，如果库存没有了，则在该商品的名称上面加上一条删除线，同时将颜色变灰。如果真的不行，那就只有试试看别的方法了~~
再研究一会儿，立刻结贴

Answer 5

换个控件MSHFlexGrid，五颜六色随便你搞。