Copiar todos los elementos de un listbox a otro, omitiendo posibles duplicados

Para Dante Amor

Maestro, necesito de tu ayuda, pero tengo un problema... Soy chileno y no creo que tengas ganas de ayudarme. Jejejejejejej (Sorry por lo de ayer, fue mucho)

Necesito hacer lo siguiente, tengo un botón para pasar un elemento desde Listbox1 a listbox2, si el elemento ya existe no lo copia, en el uno a uno lo hago bien, pero también existe la posibilidad de luego de hacer un ingreso individual, también pueda hacer un ingreso masivo para todos los elementos del listbox1 al listbox2, es ahí donde debo hacer una comparación de cada item del listbox1 y compararlo si ya existe en el listbox2, si no existe lo copia y si existe lo omite.

Espero haberle explicado bien,

Algo así como un

For i = 0 To ListBox1.ListCount - 1

For e= 0 To ListBox2.ListCount - 1

if ListBox1.List(i, 0) <>ListBox1.List(e, 0) then

ListBox2.AddItem ListBox1.List(i, 0)

end if

next

next

Pero este código no hace nada... Hay algo que debe estar fallando...