Visual Basic - Como puedo saber los nombres de archivos que....

¿Como puedo saber los nombres de archivos (con sus extensiones), que hay en un determinado directorio? Cada uno de estos nombres los quiero meter en una variable de tipo String. Gracias

usar el Dir

Eje:
Archivo= dir(path&"\*")

Do while trim(Archivo)<>""
'Archivo = Contiene el nombre del Archivo

Archivo= dir()
loop

dim Archivo() as string
dim x as integer
x=0
Archivo= dir(path&"\*")
Do while trim(Archivo)<>""
Archivo(x)= dir()
x=x+1
loop

donde Archivo(0) es el primer archiv encontrado.
donde Archivo(1) es el segunto archiv encontrado.
y asi seguido.....

creo que es mas lo que el quiere. bueno. saludos.