VB6.0 类listItem和控件listView 的使用有关问题

VB6.0 类listItem和控件listView 的使用问题
Set listItem = ListView1.ListItems.Add(, , "0X" + Hex(i)) '添加地址偏移
listItem.SubItems(i) = Hex(buff(i)) '添加数据

第二句出现问题，提示“Run-Time error '380' Invalid property value”

这两句是我从第三方提供的例子中复制过来的，其中buff是从下位机读出来的数据数组，listItem是个listItem对象
我不明白这两句什么意思，我猜想是如同VB.NET中的ListView一样的用法，就是创建n个元素，每个元素下又有子元素，于是我重新写了一个form程序，如下所示
以下是我的程序

VB code


Dim listItem As listItem
Dim buff(0 To 4) As Integer
Dim DATASIZE As Integer
Dim temp() As String
Dim temp16() As String
Dim bytelen As Integer


Private Sub Command1_Click()
Dim i As Integer
buff(0) = 12
buff(1) = 13
buff(2) = 14
buff(3) = 15
buff(4) = 16

For i = 0 To 4


Set listItem = ListView1.ListItems.Add(, , "0X" + Hex(i)) 
listItem.SubItems(i) = Hex(buff(i))           
Next i
End Sub

每次运行都会弹出对话框，请大侠指教

------解决方案--------------------
为什么不看看msdn呢？应该很容易找到问题的

VB6.0 类listItem和控件listView 的使用有关问题

相关推荐