vb中怎么添加listview控件？

添加listview控件的方法如下：

打开VB6.0

按下CTRL+T

添加Microsoft Windows Common Controls 6.0部件

就会出现listview控件了

需要通过菜单添加，具体方法：

【工程】--【部件】，进入【部件】对话窗口，通过滚动条，显示并勾选

Microsoft Windows Common Controls 6.0 (SP6)

[确定]，这样在工具箱里，会增加几个控件，其中又一个就是。

Private Sub Command1_Click()

Dim item As ListItem

        Set item = ListView1.ListItems.Add(, , Text1)

        item.SubItems(1) = Text2

        item.SubItems(2) = Text3

        item.SubItems(3) = Text4

End Sub

Private Sub Form_Load()

   With ListView1

    .View = lvwReport

    .ColumnHeaders.Add , , "a"

    .ColumnHeaders.Add , , "b"

    .ColumnHeaders.Add , , "c"

    .ColumnHeaders.Add , , "d"

  End With

End Sub

这个列表我也是刚学，只弄懂了怎么添加，列表的第一列是主项，通过ListItems.Add添加，其它列是该项目下子项，通过该主项的子项数组SubItems赋值，下标从1开始。

---