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.