“Conocimientos Programación>Visual Basics Programación

Cómo modificar un archivo de texto en Access 2003 Visual Basic

2014/3/3
La base de datos del programa Microsoft Access tiene un lenguaje de programación llamado Visual Basic ( VB ) construido en él. Puede programar VB para automatizar cualquiera de los comandos de acceso ' , incluyendo las de los archivos de texto modifican . Modificación de estos archivos con VB implica el uso del comando "open" , junto con las declaraciones que realizan los cambios deseados en el texto. Modificación de los archivos de texto con acceso "lenguaje VB le permite procesar los datos legibles almacenados en el disco duro , tal como pre - procesamiento para su posterior gestión de datos a través de Access ' interfaz estándar . Cosas que necesitará
Microsoft Access 2003
Ver Más instrucciones
1

Open Access , a continuación, pulse "Alt " + "F11 " para entrar en el entorno de desarrollo integrado de Visual Basic ( IDE).

2 Haga clic en el menú "Insertar " la partida , seguido de la opción de menú "Módulo " . Este comando inserta una nueva ventana de código para que se introduzca el código de programa
3

pegue el siguiente código en cualquier lugar en la nueva ventana de código : .

Public Sub ModifyTextFile ()

Dim someText

Abrir "c: \\ infile.txt " Para la entrada como # 1

Abrir "c: \\ outfile.txt " para la salida como # 2

Do While Not EOF ( 1 ) High Line

entrada # 1 , someText

'text Proceso aquí

Print # 2 , someText

Loop

Close # 1

Close # 2

Kill " c: \\ infile.txt "

Name " c: \\ outfile.txt " As " c: \\ infile.txt "

End Sub

Estas declaraciones abrir archivos de texto para leer y escribir , a continuación, leer cada línea del archivo de entrada . La declaración de "Imprimir ", escribe cada línea, sin procesamiento , el archivo de texto de salida. Después de que el programa se cierra los archivos de entrada y de salida , se elimina el archivo de entrada y cambia el nombre del archivo de salida con el nombre del archivo de entrada. Este resultado de este proceso es el archivo de entrada original . El comentario "text Proceso aquí " muestra donde se puede insertar código que modifica el texto de entrada . Usted modifica el texto de entrada en los próximos pasos.
4

Tipo sobre el comentario " " texto Proceso aquí "con el" someText = UCase ( someText ) ", declaración que se convertirán cada personaje en el archivo de entrada a mayúsculas. Esta acción es un ejemplo de la modificación del archivo de entrada.
5

Crear , el Bloc de notas o cualquier otro procesador de texto , un archivo de texto con el texto en minúsculas desea . Guarde el archivo como "c: \\ infile.txt ", a continuación, cierre el archivo. Estas acciones permitirán a la subrutina que anotó en el paso 3 para leer el archivo .
6

Haga clic en cualquier declaración en el subprograma " ModifyTextFile ", luego presione "F5 " para ejecutar el programa.

7

Vuelva a abrir el archivo que creó en el paso 5 . Su procesador de texto mostrará el mismo texto que escribió en letras mayúsculas
8

Tipo más , en el IDE de VB, la declaración " someText = UCase ( someText ) " con estas nuevas declaraciones : .

Si ( someText = "antes ") Luego

someText = " después de"

End If
9

Abrir "c: \\ infile.txt "en su procesador de textos y el tipo al menos una instancia de la palabra" antes " y vuelva a guardar y cerrar el archivo.
10

Ejecutar el programa de nuevo , como lo hizo en el paso 6 .
11

Re -open "c : \\. infile.txt " Todas las apariciones de la palabra "antes" ahora se muestran "después". Esto muestra cómo el programa de modificación de texto puede reemplazar una cadena de texto con otro .

Visual Basics Programación
Cómo utilizar archivos BMP con QBasic
Cómo crear punteros en Visual Basic
Cómo hacer un gráfico Terreno en Visual Basic 2008
Cómo corregir un error de desbordamiento de Visual Basic Microsoft
Cómo descifrar un archivo cifrado de Blowfish
Cómo utilizar la barra de progreso de ActiveX en Access 2003 con Visual Basic
Visual Basic 5.0 Tutorial
Cómo agregar filas DataView
Conocimientos Informáticos © http://www.ordenador.online