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 listItemDim buff(0 To 4) As IntegerDim DATASIZE As IntegerDim temp() As StringDim temp16() As StringDim bytelen As IntegerPrivate Sub Command1_Click()Dim i As Integerbuff(0) = 12buff(1) = 13buff(2) = 14buff(3) = 15buff(4) = 16For i = 0 To 4Set listItem = ListView1.ListItems.Add(, , "0X" + Hex(i)) listItem.SubItems(i) = Hex(buff(i))           Next iEnd Sub