یه Not اضافه کنید به بعد اون If


for i = 1 to vs1.rows

for s = 1 to vs2.rows

if not vs1.TextMatrix(i,2) = vs2.TextMatrix(i,2) then

listbox1.additem vs1.textmatrix(i,2)

vs1.row = vs1.row + 1

vs2.row = vs2.row + 1

end if

next i

next s


موفق باشید ./