Databasen programmet Microsoft Access har et programmeringsspråk kalt Visual Basic ( VB ) bygget inn i den. Du kan programmere VB å automatisere noen av Access ' kommandoer , inkludert de for redigering av tekstfiler . Modifisere slike filer med VB innebærer å bruke "åpen "-kommandoen , kombinert med uttalelser som utfører de ønskede endringene i teksten. Endre tekstfiler med Access ' VB språk lar deg behandle lesbar data som er lagret på harddisken din , kanskje som pre - prosessering for ytterligere data management via Access ' standard grensesnitt. Du trenger
Microsoft Access 2003
Vis flere instruksjoner
en

Open Access , og trykk deretter på "Alt" + "F11 " for å gå inn i VB integrert utviklingsmiljø ( IDE ) .
2

Klikk på " Insert"-menyen overskriften , etterfulgt av " Module " menyen . Denne kommandoen setter inn en ny kode vindu for deg å skrive programkode
3

lim inn følgende kode hvor som helst i den nye koden vinduet : .

Public Sub ModifyTextFile ( )

Dim someText

Åpne "c : \\ infile.txt " For Input As # 1

Åpne "c : \\ outfile.txt " For Output As # 2

Mens Not EOF ( 1 )

Linje Input # 1 , someText

' Process tekst her

Print # 2 , someText

Loop

Close # 1

Close # 2

Kill "c : \\ infile.txt "

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

End Sub

Disse uttalelsene åpne tekstfiler for lesing og skriving , og lese hver linje av input filen . "Skriv ut" statement skriver hver linje , uten behandling, til utgangen tekstfil . Etter at programmet lukker input og output filer , det sletter input filen og endrer navnet på output filen med input filen filnavn . Dette resultatet av denne prosessen er den opprinnelige input-filen . Kommentaren " Process tekst her " viser hvor du kan sette inn kode som endrer inn tekst. Du vil endre skrive inn tekst i de neste trinnene .
4

Type over kommentaren " ' Process tekst her " i påstanden " someText = UCase ( someText ) ", som vil konvertere hvert tegn i input -filen til store bokstaver . Denne handlingen er et eksempel på å endre input-filen .
5

Lag, med Notepad eller en annen tekstbehandler , en tekstfil med noen små teksten du ønsker. Lagre filen som "c : \\ infile.txt ", og lukker deretter filen . Disse handlingene vil gjøre subrutinen du skrev i trinn 3 for å lese filen .
6

Klikk noen uttalelse i " ModifyTextFile " subrutine , og trykk "F5 " for å kjøre programmet .

7

Re- åpne filen du opprettet i trinn 5 . Tekstbehandlingsprogrammet vil vise den samme teksten du skrev i store bokstaver
8

Skriv over , i VB IDE, utsagnet " someText = UCase ( someText )" med disse nye uttalelser : .
p Hvis ( someText = "før" ) Then

someText = "etter"

End If
9

Åpne "c : \\ infile.txt " i tekstbehandlingsprogrammet og skriv minst en forekomst av ordet " før ", deretter re- lagre og lukke filen .
10

Kjør programmet igjen, som du gjorde i trinn 6 .

11

Re -open "c : . \\ infile.txt " Alle forekomster av ordet "før " nå vise " etter ". Dette viser hvordan din tekst - modifikasjon programmet kan erstatte en tekststreng med en annen.