*************小弟在处理LISTBOX中的数据时,写了如下代码以删除其中重复的数据,但始终不好使,为什么?*************来者有分!!!!!!!

Question

再.RemoveItem j后加上i=i-1就可以了.

Answer 1

With List3
            If .ListCount > 1 Then
                i = 0
                While i < .ListCount
                    j = i + 1
                    While j < .ListCount
                        If .List(i) = .List(j) Then
                            .RemoveItem j
                        End If
                    j = j + 1
                    Wend
                i = i + 1
                Wend
            End If
End With
//只是优化了一下，但是没变实质的东西！

Answer 2

多谢chenhw(我要回复)!  搞定了.....
为什么这么写?

Answer 3

循环变量有问题
RemoveItem之后本来是后一项的现在为当前项,你再j = j + 1,i = i + 1
就错过了这一项.
所以在RemoveItem之后,加上j = j - 1,i = i - 1来保持不漏项