如果要分组显示，指定每行数据的分组即可，如：
http://www.foxtable.com/webhelp/topics/2773.htmFor Each dr As DataRow In DataTables("国家").DataRows
Dim Key As String = dr("图标")
Dim r As WinForm.ListViewRow = lvw.Rows.Add() '增加一行
lvw.Images.AddImage(Key, Key & ".ico", Key & "48.ico") '添加代表这个国家的一对图标
r.ImageKey = Key '指定图标键值
r.Group = dr("洲") '指定所属分组
For Each cl As String In cls '逐列取值
Select Case cl
Case "人口","面积" '如果是人口列或面积列
如果要只显示一组的数据，取数据的时候根据条件取，如：
For Each dr As DataRow In DataTables("国家").select("洲='亚洲'")
Dim Key As String = dr("图标")
Dim r As WinForm.ListViewRow = lvw.Rows.Add() '增加一行
加好友 
发短信
Post By：2020/6/14 21:01:00 [显示全部帖子]
