求VBA中ListView控件ListItem对象text属性与SubItems属性详解?

如题:
添加语法:object.ListItems.Add(index,key,text,icon,smallIcon)
中text参数表示什么?
ListItem.text与ListItem.SubItems又表示什么意思?
本人愚昧,望高人指点?

text 属性是listview一行的文本属性,通常是第一列表格中的文字

subitems指的listview一行中其它表的属性

subitems(1)即是第二列表格中的文字,

subitems(i)要大于0,小于总列数,(因为有一列为text)

通常通用add添加以后有了text头,但是要设置其它表格的值就要设置
subitems(i)等一系列值了。

通常添加一行需要如下操作

Set items = ListViewMess.ListItems.Add(, ,, , 1)
****.SubItems(1) = ×××
****.SubItems(2) = ×××
****.SubItems(3) = ×××
****.SubItems(4) = ×××

50分,如果有不明白的还可以再问我。
温馨提示:内容为网友见解,仅供参考
第1个回答  2010-04-04
ListView 是个列表类型的控件,在它里面可以显示图标、文字 而且是列的形式。

text 是每列的标题文字。在ListView中属于 第(0)列文字。 但是没有SubItems(0) 这一说, 用户真正添加的列是 从 SubItems(1) 开始的。 一个列表可以没 SubItems(1)往后的项目列 但是一定有 text属性的 只要列表里有信息 肯定有text。Text可以为空信息。

ListView.ListItems(1).Text 第一行 第(“0”)列 标题文字
ListView.ListItems(1).SubItems(1) 第一行 第一列内容
第2个回答  2013-01-19
我收藏一下,谢谢

求VBA中ListView控件ListItem对象text属性与SubItems属性详解?
text 属性是listview一行的文本属性,通常是第一列表格中的文字 subitems指的listview一行中其它表的属性 subitems(1)即是第二列表格中的文字,subitems(i)要大于0,小于总列数,(因为有一列为text)通常通用add添加以后有了text头,但是要设置其它表格的值就要设置 subitems(i)等一系列值了。通常添...

VBa listview属性含义
text 属性是listview一行的文本属性,通常是第一列表格中的文字 subitems指的listview一行中其它表的属性 subitems(1)即是第二列表格中的文字,subitems(i)要大于0,小于总列数,(因为有一列为text)通常通用add添加以后有了text头,但是要设置其它表格的值就要设置 subitems(i)等一系列值了。通常添...

VBA ListView1如何实现窗体内求和写入文本框
textbox中的数据添加到listView中去 直接listView1.Items[i].SubItems[j].Text = textBox.text就行了 写数据库不会了可以继续问我

VBA学习笔记59-1: listview控件
设置ListView显示为报告格式。可启用或禁用表格线,通过设置ListView.Gridlines为True或False实现。使用SubItems数组添加数据时,先添加行对象集合,然后通过循环将单元格值赋给Subitem。使用ListSubitems集合添加数据更为简便,直接添加一行,再逐行赋值。注意SubItems与ListSubitems的区别,前者为字符串数组,后者...

VBA学习笔记59-2: listview控件
首先,要在ListView中显示图标,需在窗体中插入Microsoft ImageList Control 6.0(SP6)。设置Imagelist控件的自定义属性,调整图标大小,并使用支持的图片格式,如ipeg或选择合适的示例图片。图标通过ImageList控件的Index进行引用,可用Icons、SmallIcons或ColumnHeaderIcons属性获取。列标题的显示图标可以通过直接...

...其它程序后再切换回excel的窗体,如何使listview保持焦点
回答:试试在你执行完操作后加上LISTVIEW1.SETFOCUS

如何让VBA中的ListView控件的指定单元格显示HH:MM:SS的时间格式?
你所指代的意思不明确,是想让控件中的列的内容显示为时间格式呢,还是想让控件输出到的单元格显示为时间格式?还有,你的数据原本是什么格式的数据,也不明白?如,数据“1.5“,是指1:50:00,还是00:01:50?问题问得太模糊了,所以才长时间没人做答。

VBA ListView 报错380,在我标注''后的那句话,请高手赐教?
Private Sub CommandButton1_Click()Dim Itm As ListItem Dim i As Integer Dim j As Integer Me.ListView1.ListItems.Clear For i = 1 To Workbooks("ListView.xlsm").Sheets("Sheet2").Range("A65536").End(xlUp).Row Set Itm = ListView1.ListItems.Add()Itm.Text = Workbooks("ListView...

excel VBA 窗体 录入
Exit subEnd If当然,也可以用字典对象来做,更简单。还有,那段查找B列最后一个空单元的循环可以简化为一句代码,如下:i = Range("B65536").End(xlUp).Offset(1,0).RowList 控件的 RowSource 属性可以和工作表单元格关联,然后仿照前面判断重复的代码,进行记录的定位,然后进行修改并保存。

VBA使用ListView读取数据库的表时出错
在列表建立属性和访问数据库时,对应好每一字段,就不会有问题了public void InitListView(){ listView.View = View.Details;listView.GridLines = true;listView.FullRowSelect = true;ColumnHeader header1 = new ColumnHeader();ColumnHeader header2 = new ColumnHeader()...

相似回答