Here is an example of some code that I am working on, it is a very basic example:

Dim test1(8) As Integer
Dim test2(8) As Integer
Dim a As Integer
dim j As Integer

test1(1) = 1
test1(2) = 2
test1(3) = 1
test1(4) = 3
test1(5) = 8
test1(6) = 2
test1(7) = 8
test1(8) = 3

For j = 1 To 8
a = test1(j)
test2(j) = a
Next j
End Sub

This is my dillema
How can I add to the second array the values in the first array, here is the tricky part. I do not want duplicates.
so at the end the second array will have the values: 1, 2, 8 and 3. (I know I will have empty slots in the array, but I just want see all the values withough duplicates) Can this be done, thanks