程序片断

a="1,2,12,31,23,12,3"

b="1,2,12,31,23,12,3,1,2,12,31,23,12,3"

array1=split(a,",")

array2=split(b,",")

for i=lbound(array1) to ubound(array1)
  for j=lbound(array2) to ubound(array2)
    if array1(i)=array2(j) then
         have
    end if
  next
next