Fast bredde tekstfiler er et dataformat hvor informasjonen er lagret i en serie kolonner , hver og en av en fast bredde , slik at hvilken som helst datamaskin som kjenner forhåndsdefinert bredde på kolonnen for å raskt og lett å lese dataene uten spesiell parsing . Det gir også data som skal skrives i menneskelige lett lesbare tabeller. Blant annet bruk , er resultatene av MySQL kommandoer vanligvis gis i fast bredde format . For dette eksempelet , vil programmet skrive en predefinert tekst fil for et bibliotek database med titler , forfattere, og datoer for bøkene som legges inn i biblioteket . Instruksjoner
en
Lag et nytt prosjekt ved å klikke på "File ", "New Project ". Velg " Console Application " type . Senere kan du bruke nøyaktig samme koden , uten endringer, som en del av et grafisk brukergrensesnitt ( GUI ) prosjekt . Navn prosjektet " . Fast bredde Writer "
2
Lim følgende Kolonnebredden konstanter på toppen av kildekoden : en
Konst TITLE_FIELD som heltall = 25
< p > Konst AUTHOR_FIELD som heltall = 15
Cosnt DATE_FIELD som heltall = 10
3
Lim bibliotekets data for bøkene. Det vil bli plassert i en matrise som heter libraryData : en
Dim libraryData ( , ) som String =
{ {" To Kill a Mockingbird ", " Harper Lee ", " 01/23/2010 "} , etter
{" The Stand "," Stephen king " , " 02/15/1992 "} }
4
Opprett en tekstfil for å skrive som en fast bredde tekstfil og lage en " TextFileWriter " for det : en
Dim tekstfil som string = " filnavn.txt "
dim tekstforfatter = My.Computer.FileSystem.OpenTextFileWriter ( tekstfil , False )
" False " indikerer at du ikke ønsker å legge inn dataene i filen .
5
Paste følgende for å skrive kolonnen nøkkelfunksjon til dette er den « PadRight "-funksjon: dette settes så mange områder som nødvendig til enden av strengen for å gjøre den lik en total av det gitte antall mellomrom . Dette gjør at du kan skrive ut hver kolonne til en fast bredde
6
Lim inn følgende for å skrive data til filen : .
X som heltall = 0 til libraryData.getLength ( 0 ) - Side 7
Lim inn følgende for å lukke filen : en
textWriter.Flush ( )
textWriter.Close ( )
" Flush " sikrer at den siste av dataene har blitt skrevet til filen .