VB 2005 - llenar un array y definir su tamaño

[Laufwerk]

Hola amigos!!!
Tengo un array que la defino como publica

Public myvar() as string

pero que el tamaño de dicho array no se lo puedo definir hasta que no conecto con la BD. Entonces mi idea es

n = dt.Rows.Count
myvar(n)

porque dentro de un bucle tendré que ir rellenando aleatoriamente el arreglo
Es decir, para cada fila del dt, tenemos un campo codigo

dt.Rows(i).Item("Codigo")

entonces si por ejemplo n= 5000 y codigo vale 344, lo que quiero es que el array en la pos 344 valga la i del for, es decir
myvar(dt.Rows(i).Item("Codigo")) = i

esto es posible?

GRacias!!!!!