Cómo agregar una cadena al final de un archivo en Visual Basic 6

manipulación de archivos es a menudo una necesidad común de los usuarios de programas de ordenador . Visual Basic 6 tiene algunas fáciles de usar funciones simples , que permiten abrir un archivo existente y añadir nueva información a la final de la misma , incluidas las cadenas . La clave para la preservación de los datos de archivos existentes es abrirlo en el modo de " Añadir" para que el programa no sobrescribe el contenido existente . Utilice la función " Write" para añadir una cadena al final del archivo y cierre en el código para evitar cualquier error de escritura. Instrucciones
1

Abra el proyecto de Visual Basic 6. Haga doble clic en el control " CommandButton " para añadir " Command1 " al formulario. Haga doble clic en " Command1 " para acceder al " Command1_Click ()" ventana de código
2

Escriba el siguiente para declarar las variables que debe agregar la cadena en el archivo: .

fileName dévil como secuencia

miCadena dévil como secuencia
3

Escriba lo siguiente :

fileName = "C : \\ miArchivo.txt "

fileName abierto para Append Como # 1

la función "Abrir" se abre el archivo especificado en la ruta de acceso proporcionada a la variable " nombre de archivo" . Si este archivo no existe, VB6 crea el archivo . La función " Añadir" indica al programa para agregar nuevo contenido al final del archivo . El "# 1 " porción especifica que este es el primer archivo que el programa tiene abierto. Puede utilizar otro número (o una variable entera ) si tiene más de un archivo abierto en un momento en el programa
4

Escriba lo siguiente : .

MiCadena = " Mi cadena "

Write # 1 , miCadena ; vbNewLine

Close # 1

la primera línea establece una cadena que se va a agregar al final del archivo . La segunda línea utiliza la función " Write" para anexar la cadena, luego añade una nueva línea en el archivo para que sea más legible. La última línea se cierra el archivo.