大家看看我的这个程序有什么问题

Question

以下程序是node的click事件中的代码，很简单就是塞选出图片文件然后缩小显示在treeview旁边的listview里。但如果点了某一目录再点其它然后再点回来的话会出现一个运行错误：“相同的key”，明显说的是
ImgFilesLarge.ListImages.Add , PicKey, LoadPicture(PicKey)这句
但前面已经
lstMain.ListItems.Clear了啊，怎么以前的listitem没有删除掉？？===========================代码：lstMain.ListItems.Clear        
    For Each lFile In lFiles
        
        Dim houzhui As String
        houzhui = Right(lFile.Name, 3)
        
        If houzhui = "jpg" Or houzhui = "gif" Or houzhui = "ico" Then
          
          Dim PicKey As String
          PicKey = lFileSys.GetFolder(Pth) & "\" & lFile.Name
          
         
                        ImgFilesLarge.ListImages.Add , PicKey, LoadPicture(PicKey)
            Set lItem = lstMain.ListItems.Add(, , lFile.Name, PicKey)
          
      
          
        End If
    Next

Answer 1

ListView1.ListItems.Clear
上面语句会把ListView1的资料全部清空。ListView1.ListItems.Remove (ListView1.SelectedItem.Index)
上面语句会把ListView1的当前选定的资料清除。

Answer 2

ListView1.ListItems.Clear
上面语句会把ListView1的资料全部清空。
===================
既然清了为什么还有警告？

Answer 3

是不是你imagelist里的PicKey重复了阿？

Answer 4

楼上。你是说LoadPicture(PicKey)这？image也要清么？