Fast bredde tekstfiler et dataformat , hvor oplysninger lagres i en serie af kolonner , hver af en fast bredde , så du til enhver computer, der kender den foruddefinerede bredde kolonne til hurtigt og nemt læse data uden særlig parsing . Det giver også de data, der skal udskrives i humane letlæselige tabeller. Blandt andre anvendelser er resultaterne af MySQL kommandoer almindeligvis gives i fast bredde format . I dette eksempel , vil programmet skrive en fast bredde tekstfil til et bibliotek database med titler , forfattere og datoer for de bøger, der er opført i biblioteket. Instruktioner
1

Opret et nyt projekt ved at klikke på "File ", " Nyt projekt ". Vælg " Console Application " type . Senere kan du bruge den nøjagtige samme kode uden ændringer som del af en Graphical User Interface ( GUI) projekt. Navngiv projektet " . Fast bredde Writer "
2

Indsæt følgende kolonnebredden konstanter i toppen af kildekoden : Hej

Const TITLE_FIELD som heltal = 25
< p > Const AUTHOR_FIELD som heltal = 15

Cosnt DATE_FIELD som heltal = 10
3

Indsæt bibliotekets data for bøgerne. Det vil blive placeret i et array ved navn libraryData : Hej

Dim libraryData (,) som String =

{ {" To Kill a Mockingbird ", " Harper Lee ", " 01/23/2010 "} , Amerikas

{" The Stand "," Stephen King "," 1992/02/15 "}}
4

Opret en tekstfil til at skrive som en fast bredde tekstfil og skabe en " TextFileWriter " for det : Hej

Dim tekstfil som string = " filename.txt "

dim textWriter = My.Computer.FileSystem.OpenTextFileWriter ( tekstfil , False ) < br >

" False " betyder, at du ikke ønsker at tilføje data i filen.
5.

indsæt følgende for at skrive kolonnen nøglefunktion for dette er " PadRight "-funktionen : dette lægger så mange rum som nødvendigt til slutningen af ​​strengen for at gøre det svarer til en samlet det givne antal mellemrum . Dette giver dig mulighed for at udskrive hver kolonne til en fast bredde
6

Indsæt følgende for at skrive data til filen : .

X som heltal = 0 til libraryData.getLength ( 0) -
7

Indsæt følgende for at lukke filen : Hej

textWriter.Flush ()

textWriter.Close ()

" Flush " sikres , at den sidste af de data, der er blevet skrevet til filen.