Visual Basic - abrir 2 archivos

buenas tardes...
mi pregunta es:
No puedo abrir yo 2 archivos al mismo tiempo?
esque tengo este trozo de codigo y me da el error que dice que el archivo
ya esta abierto....

z = FreeFile
n2 = FreeFile
archivo2 = "\\Kristhyn\Software\" & a1.Text & ".bck"
archivo = "\\Kristhyn\Software\" & a1.Text & ".expt"
Open archivo For Random As n2 Len = Len(x)
Open archivo2 For Random As z Len = Len(x)

y en esta ultima linea es donde me da el error...
que puedo hacer???

Primero tenes que abrir el archivo para usar Freefile y que te devuelva un numero de archivo distinto: ejemplo:


archivo2 = "\\Kristhyn\Software\" & a1.Text & ".bck"
archivo = "\\Kristhyn\Software\" & a1.Text & ".expt"

n2 = FreeFile
Open archivo For Random As n2 Len = Len(x)

z = FreeFile
Open archivo2 For Random As z Len = Len(x)

saludos
-------------------------------------------------------------------------