Isn't it because you have to do:
For i = dbsLV1.ListItems.Count to 1 step -1
...
>If you are interesed why firs version bombs, I think it is because yu need
>to do
> For i = 0 To dbsLV1.ListItems.Count-1
>Glad you found easier way!
>--------------------------------------
>> Found it !! Thanks anyway
>> dbsLV1.ListItems.Clear
>> that's all........amazing, what going away and
>> having a cup of tea can do for you :-)
>> > Just a *, how can I empty a ListView in Report
>> > style if items and subitems......
>> > I've tried
>> > For i = 1 To dbsLV1.ListItems.Count
>> > dbsLV1.ListItems.Remove (i)
>> > Next i
>> > This deletes a couple of lines the bombs out, (I think
>> > it's to do with 5 subitems)
>> > Data is
>> > Code Description Price Price Group Catalogue
>> > Thanks in advance
>> > Perry J Hemmings