参考：
http://www.foxtable.com/webhelp/topics/2772.htm
比如
……
lvw.Images.AddImage("第一组","第一组.ico", "第一组48.ico")
lvw.Images.AddImage("第二组","第二组.ico", "第二组48.ico")
lvw.Images.AddImage("第三组","第三组.ico", "第三组48.ico")
For s as string in 集合1
Dim r As WinForm.ListViewRow = lvw.Rows.Add() '增加一行
r.Text = s '指定标题
r.ImageKey = "第一组" '指定图标键值
r.Group = "第一组"
Next
For s as string in 集合2
Dim r As WinForm.ListViewRow = lvw.Rows.Add() '增加一行
r.Text = s '指定标题
r.ImageKey = "第二组" '指定图标键值
r.Group = "第二组"
Next
加好友 
发短信
Post By：2022/6/2 9:46:00 [显示全部帖子]
