ايران ويج

سلام

مثلا ما دوتا لیست باکس داریم

listbox1 شامل موارد زیر هست :

و
listbox2 شامل موارد زیر هست :

چه طور میشه Listbox1 را با Listbox2 مقایسه کرد (از نظر item ها) و مواردی که در listbox1 وجود نداره را به ما نشون بده (مثلا در یک لیست باکس دیگه Add کنه)

اگر اطلاعات ورودی شما به همین شکلی که اینجا نوشتید sort شده است که کار مشگلی نیست چون اصلا مقایسه نمی خواد و تعداد رو نگاه می کنی که اگر تعداد اولی با دومی با هم نمی خورد اونی که بیشتر عضو داره رو اعضای بیشترش رو در یک لیست باکس جدید بریزه. اما اگر شما اطلاعات ورودیت sort شده نیست بگو تا برات بنویسم.

با اين كد چه SORT باشه چه نباشه تك تك مقايسه ميكنه همه ITEM هارو:

dim Is1 as boolean
for i=0 to list1.listcount-1
Is1=false
for j=0 to list2.listcount-1
if list1.list(i)=list2.list(j) then is1=true
next j
if is1=false then list3.additem list1.list(i)
next i