Cómo crear un archivo de texto en Visual Basic 6

El lenguaje de programación Visual Basic ha evolucionado a lo largo de los años y ahora dirige el potente plataforma .NET de Microsoft. Si tiene una versión anterior de Visual Basic como Visual Basic 6, que todavía se puede utilizar para crear aplicaciones útiles e interactivos. Al igual que su contraparte más reciente .NET, VB6 contiene bibliotecas de código pre-construidos que ayudan a los desarrolladores de software crean prototipos y útil de forma rápida. Por ejemplo, si la aplicación necesita para crear y escribir en archivos de texto, biblioteca de código de VB6 puede simplificar su tarea.

Instrucciones

1 Haga clic en el botón del menú Inicio de Windows y escriba "Visual Basic". Cuando el icono de Visual Basic aparece en la ventana de resultados de búsqueda, haga clic en ese icono para iniciar Visual Basic.

2 Haga clic en "EXE estándar", y haga clic en "Abrir". Un nuevo formulario denominado "Form1" aparece en la ventana de edición.

3 Busque la caja de herramientas en la parte izquierda de la interfaz de usuario. Haga doble clic en la herramienta "Botón de comando". VB6 coloca un botón en el formulario denominado "Command1".

4 Haga doble clic en ese botón. La ventana de código se abre y muestra el siguiente código:

Private Sub Command1_Click ()

End Sub

Este código se ejecuta cuando un usuario hace clic en el botón. Que va a utilizar este botón para probar el código que escribe en un archivo de texto.

5 Coloque el código siguiente antes del cierre "End Sub" declaración:

Dim como secuencia TEXTFILE

Dim como secuencia textToWrite

TEXTFILE = "C: \ MiCarpeta \ MyFile.txt"

textToWrite = "Este es el texto"

TEXTFILE abierta For Output As # 1

Impresión # 1, textToWrite

Close # 1

La variable denominada "archivo de texto" mantiene a la ruta para el nombre del archivo en el que desea escribir. En este ejemplo, el archivo es "C: \ MiCarpeta \ MyFile.txt." Reemplazar que con cualquier nombre de ruta que te gusta. Si elige un archivo que ya existe, Visual Basic 6 borra ese archivo y lo sobrescribe con el siguiente texto. Si elige un nombre de archivo que no existe, VB6 crea un nuevo archivo.

6 Busque la variable "textToWrite". Su valor es "Este es el texto." Reemplazar ese valor con el texto que desea que aparezca en el archivo de texto. La declaración "Abrir" se abre el archivo en modo de salida. La declaración también necesita un identificador de archivo. En este ejemplo, el identificador es # 1. Se puede elegir cualquier número que desee como identificador. El "Imprimir" declaración escribe su texto en el archivo, y el "Cerrar" declaración de cierre. Si cambia el "Open" identificador de archivo de declaración a otro valor, tal como # 4, cambiarlo en los estados "Cerrar" "Imprimir" y así. Los tres estados deben hacer referencia al mismo valor.

7 Pulse la tecla "F5". VB6 ejecuta la aplicación y muestra el formulario que contiene el botón.

8 Clic en el botón. VB6 crea un nuevo archivo de texto si no existe y escribe el texto que ha asignado a la "textToWrite" variable.

Consejos y advertencias

• En este ejemplo, se establece el texto de salida manualmente. También podría recuperar el texto de un cuadro de texto, otro control VB6 o incluso una base de datos. Después de obtener una cadena de texto, asignarle a la variable "textToWrite" como se describe en los siguientes pasos. Para añadir nuevos datos a un archivo existente, sustituir la palabra "salida" con "Agregar" en la declaración que dice lo siguiente: "Abrir archivo de texto para la salida como # 1."