常用操作:
获取当前行数:
ListView1.ListItems.Count
获取当前列数:
ListView1.ColumnHeaders.Count
设置宽度:
ListView1.ColumnHeaders.Add
, , "备注",
1500
当前选中行:
ListView1.SelectedItem.Index
获取复选框的值:
ListView1.ListItems(1).Checked
删除当前选中行:
ListView1.ListItems.Remove(ListView1.SelectedItem.Index)
删除指定行:
ListView1.ListItems.Remove
3
读取某行第一列内容:
ListView1.ListItems(i).Text
读取某行第几列内容
(不包括第一列):
ListView1.ListItems(i).SubItems
(j)
修改一行:
ListView1.ListItems(i).SubItems(j) =
"123"
读取当前选中行第一列内容:
ListView1.ListItems(ListView1.SelectedItem.Index).Text
清空列表头:
ListView1.ColumnHeaders.Clear
清空列表:
ListView1.ListItems.Clear
设置某行为选中/非选中状态:
ListView.ListItems(i).Selected
= True ‘选中第i行
ListView.ListItems(i).Selected = False
‘取消选中第i行
设置ListView
item项颜色:
ListView1.ListItems(i).ForeColor =
vbRed
ListView1.ListItems(i).ListSubItems.Item(1).ForeColor =
vbRed
ListView1.ListItems(i).ListSubItems.Item(2).ForeColor =
vbRed
增加一行(1):
X = ListView1.ListItems.Count +
1
ListView1.ListItems.Add , , X
ListView1.ListItems(X).SubItems(1) =
"00:00:00"
ListView1.ListItems(X).SubItems(2) =
"2008-01-01"
增加一行(2):
Dim DataItem As ListItem
Set
DataItem = ListView1.ListItems.Add(, , ListView1.ListItems.count +
1)
DataItem.ListSubItems.Add , , "123"
DataItem.ListSubItems.Add , ,
"456"
排序:
ListView1.Sorted = true ‘排序
ListView1.SortKey = 1 ‘标题第1列
(排序)
ListView1.SortOrder = lvwAscending ‘将数据按升序排列
属性设置:下列的属性也可以 单击控件右键->属性 进行设置。
ListView1.View =
lvwReport
‘设置显示方式为列表
ListView1.AllowColumnReorder =
True ‘对行进行程序排列,用鼠标进行排列
ListView1.Arrange = lvwAutoLeft
‘图标横排列
ListView1.Arrange =
lvwAutoTop
‘图标竖排列
ListView1.FlatScrollBar =
False
‘显示滚动条
ListView1.FlatScrollBar =
True
‘隐藏滚动条
ListView1.FullRowSelect =
True ‘选择整行
ListView1.GridLines =
True
‘显示网络线
ListView1.LabelWrap =
True
‘图标可以换行
ListView1.MultiSelect =
True
‘可以选择多个项目
ListView1.PictureAlignment = lvwTopLeft
‘图片对齐方式是左顶部,其他有右顶部(1)、左底部(2)、右底部(3)、居中(4)、平铺(5)
ListView1.Checkboxes =
True
‘显示复选框
listview控件对象:
listview控件包括listItem对象和ColumnHeader对象。本人简单理解为:listItem对象看成数据行;ColumnHeader对象看成列标题。
listItem对象(行)有两部分:一部分是图标和简要描述的文本(第1列);另一部分是前者的子项文本信息(第2列,第3列......)。
而listItems即是对listItem对象集合(所有行)的引用。 故此,
listItems(1)可以表示为第1行;
listitems(1).text
返回第1行第1列的文本值;
listitems(1).subItem(1)返回第1行第2列的文本值。