试试用这种方式
listview.ListItems(i).ListSubItems(1)i你级的index值
1表示哪一级的列标题
listview.ListItems(i).ListSubItems(1)i你级的index值
1表示哪一级的列标题
解决方案 »
- 比秒更小的单位
- 10-1第一天上班 散分
- 控件报"Automation -2147418111(80010001)"的错误
- 谁能给我一段ADO操作数据库的代码,包括查询,插入,和修改
- 怎么把一个程序缩到系统栏里面?然后怎么再恢复出来?缩到系统栏后怎么加上一个右键弹出式菜单?每问30分
- 求freeicq的源代码!!!
- VB判别两个数据库中的存取对象.......
- 初级菜鸟求解除惑:为什么有时候自动编码时,有些方法没有提示?
- SOS====我要一个反汇编工具
- VB中将Excel文件中的记录有选择的导入Access数据库应该怎么做!60分不多不少!
- WebBrowser Control 的几个问题 (在线等待中....)
- 快帮帮我吧,这是什么意思?
k = 0
Do Until i = MSHFworkinforshow.ListItems.Count
i = i + 1
If MSHFworkinforshow.ListItems(i).Checked = True Then
k = k + 1
Select Case Pworksate
Case "通知"
MSHFreportworkinforshow.ListItems.Add k, , MSHFworkinforshow.ListItems(i)
MSHFreportworkinforshow.ListItems(k).ListSubItems.Add 1, , MSHFworkinforshow.ListItems(i).ListSubItems(1)
Case Else
MSHFreportworkinforshow.ListItems.Add k, , MSHFworkinforshow.ListItems(i)
MSHFreportworkinforshow.ListItems(k).ListSubItems.Add 1, , MSHFworkinforshow.ListItems(i).ListSubItems(1)
MSHFreportworkinforshow.ListItems(k).ListSubItems.Add 2, , MSHFworkinforshow.ListItems(i).ListSubItems(2)
End Select
MSHFworkinforshow.ListItems.Remove (i)
i = 0
End If
Loop
MSHFreportworkinforshow.Refresh
MSHFworkinforshow.Refresh
End If
这是一个将一个列表的内容往另一个列表移动的例子希望给你一点启发
不是标题的值啊
Returns a reference to a collection of ColumnHeader objects.Syntax
object.ColumnHeadersThe object placeholder represents an object expression that evaluates to a ListView control.Res
You can manipulate ColumnHeader objects using standard collection methods (for example, the Remove method). Each ColumnHeader in the collection can be accessed either by its Index or by a unique Key, stored in the Key property.
HideColumnHeaders
Returns or sets whether ColumnHeader objects in a ListView control are hidden in Report view.Syntax
object.HideColumnHeaders [= boolean]The parts of the HideColumnHeaders property syntax are described in the following table. Part Description
object An object expression that evaluates to a ListView control.
boolean A Boolean expression that specifies if the column headers are visible in Report view, as described in Settings.
Settings
The settings for boolean are:Setting Description
True The column headers are not visible.
False (Default) The column headers are visible.
Res
The ListItem objects and any related subitems remain visible even if the HideColumnHeaders property is set to True.
Debug.Print ListView1.ColumnHeaders(i).Text
Next i