Question

两个列表框数据对比问题 求大神帮忙 谢谢

如图3个列表框，我想在想用数据二跟数据一进行对比，跟数据二不相同的数据拿到列表框3里面。结果就是列表框3里面显示3跟5两组数据。请大神帮忙 非常感谢

Answer 1

复制下面的代码就能用:
Dim i As Integer
Dim j As Integer
List3.Clear
For i = 0 To List1.ListCount - 1
For j = 0 To List2.ListCount - 1
If List1.List(i) = List2.List(j) Then
Exit For
End If
Next j
If j > List2.ListCount - 1 Then
List3.AddItem List1.List(i)
End If
Next i

追问

我用的是易语言 你这个貌似是按键精灵的命令吧？

追答

呵呵，对不起，我不知道易语言。

Answer 2

给你提供下思路
1数组方法
两个列表的数据分别存在2个数组中,然后循环进行比对,找到不存在的项目
2数据库方法
分别存储在2个数据库表中,使用SQL语句查找不同
类似这样写：select 数据一.数字 from 数据一 where 数字 not in（select 数字 from 数据二 ）
这是查询表一有而表二没有的数据，反过来也能查询表二多出来的数据
用这种方法适合快速查询大量数据，比循环比对效果高得多

追问

不明白- -