¿Cómo crear un archivo para guardar algún dato?. Visual Basic, posee códigos para la creación de archivos. Estos archivos serán de texto generalmente. Podemos incluir en su contenido por ejemplo, algunos datos de configuración de uno de nuestros proyectos.
Instrucciones: Open; Print#; Write#; Close
Sintaxis:
Open “Camino y nombre y extensión del archivo a crear” For Acción (Leer: Input; Agregar: Append; Grabar: Output) As #1
Print #1, “Contenido del archivo” ‘ Se utiliza Print# al igual que Write#
Close #1
A continuación mostramos ejemplos:
Crear archivo
Open “C:\NewFile\Do.MIO” For Output as #1
Print#1, “Línea número uno”
Close#1
Agregar datos a un archivo ya creado
Open “C:\NewFile\Do.MIO” For Append as #1
Write#1, Línea última
Close#1
Para Leer datos
Dim Z As String
Open “C:\NewFile\Do.MIO” For Input as #1
Line Input #1, Z
Close#1
Label1.Caption= Z
Para leer varias líneas debe utilizar el siguiente método
Open “c:\NewFile\Do.MIO" For Input As #1
Do While Not EOF(1) ' Repite el bucle hasta el final del archivo.
On Error Resume Next ' Para evitar errores
For Q = 0 To EOF(1) ' este ciclo Repite la lectura hasta el final del archivo
Line Input #1, Z ' Guarda lo leído en una variable.
List1.AddItem (Z) ' Agrega lo leído en un Listbox
Next Q
Loop
Close #1 ' Cierra el archivo.
