dim x
dim array1(100)
dim array2

array2 = array1
ReDim preserve array2(x)