Problemas de programación vb6.0

Ejemplo de declaración Open

Este ejemplo demuestra diferentes usos de la declaración Open para lograr la salida y entrada de archivos.

El siguiente código abre el archivo TESTFILE en modo de entrada secuencial.

Abra "TESTFILE" para la entrada como #1

' Para abrir el archivo de otras maneras, primero debe cerrarlo.

Cerrar #1

El siguiente código abre el archivo en modo binario, que solo permite operaciones de escritura.

Abra "TESTFILE" para acceso binario Escribir como #1

' Para abrir el archivo de otras maneras, primero debe cerrarlo.

Cerrar #1

El siguiente código abre un archivo de forma aleatoria. El archivo contiene registros del tipo de datos definido por el usuario.

Tipo de Registro 'Define tipos de datos definidos por el usuario.

ID como entero

Nombre como cadena * 20

Tipo de fin

Dim MyRecord As Record ' Declarar variable.

Abra "TESTFILE" para aleatorio como #1 Len = Len(MyRecord)

' Para abrir el archivo de otras maneras, primero debe cerrarlo.

Cerrar #1

El siguiente código abre el archivo para salida secuencial; cualquier proceso puede leer y escribir el archivo.

Abra "TESTFILE" para la salida compartida como #1

' Para abrir el archivo de otras maneras, primero debe cerrarlo.

Cerrar #1

El siguiente código abre el archivo en modo binario, que solo permite lectura, otros procesos no pueden leer el archivo.

Abra "TESTFILE" para acceso binario Bloqueo de lectura Leer como #1