Space(Num): Genera Num espacios
LOF(ID): Da el tamaño del identificador de archivo espesificado
Donde:
- ID = Freefile()
- LOF(ID) = Num
Open Archivo For Binary Access Read As #ID
Stub = Space(LOF(ID)) 'Asignas espasio en la var para luego ser escrito con el contenido del Archivo
Get #ID, , Stub
Close #ID
Espero te ayude
Saludos!
LOF(ID): Da el tamaño del identificador de archivo espesificado
Donde:
- ID = Freefile()
- LOF(ID) = Num
Open Archivo For Binary Access Read As #ID
Stub = Space(LOF(ID)) 'Asignas espasio en la var para luego ser escrito con el contenido del Archivo
Get #ID, , Stub
Close #ID
Espero te ayude
Saludos!