Fixed Width Text -Dateien sind ein Datenformat, in dem Informationen in einer Reihe von Spalten gespeichert sind , die jeweils eine feste Breite , so dass jeder Computer, der die vorgegebene Breite der Spalte kennt , schnell und einfach die Daten lesen ohne spezielle Parsing . Es ermöglicht auch die Daten, die in der menschlichen leicht lesbaren Tabellen gedruckt werden. Unter anderen Nutzungen , werden die Ergebnisse der MySQL -Befehle häufig in fester Breite Format gegeben . Für dieses Beispiel wird das Programm ein fester Breite Textdatei für eine Bibliothek -Datenbank mit Autoren, Titel und Daten der Bücher in der Bibliothek eingegeben schreiben. Anleitung
1

Erstellen eines neuen Projekts durch Klick auf " Datei", " New Project". Wählen Sie die "Console Application" -Typ. Später können Sie das exakt gleiche Code ohne Modifikation als Teil einer Graphical User Interface ( GUI) -Projekt. Nennen Sie das Projekt " . Fixed Width Writer "
2

Fügen Sie die folgenden Spaltenbreite Konstanten am Anfang des Quellcodes :

Const TITLE_FIELD als Integer = 25
< p > Const AUTHOR_FIELD als Integer = 15

Cosnt DATE_FIELD als Integer = 10
3

Fügen Sie die Bibliothek für die Bücher. Es wird in einem Array namens libraryData platziert werden :

Dim libraryData (,) als String = { {

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

" Create The Stand "," Stephen King "," 1992.02.15 "}}
4

eine Textdatei als fester Breite schreiben Textdatei und erstellen Sie eine " TextFileWriter " dafür:

Dim Textdatei als String = " filename.txt "

dim TextWriter = My.Computer.FileSystem.OpenTextFileWriter ( Textdatei , False)

"Falsch" bedeutet, dass Sie nicht möchten, dass die Daten in die Datei angehängt .
5

Sie den folgenden , um die Spalte zu schreiben Schlüsselfunktion dafür ist die " PadRight " -Funktion: Diese legt so viele Bereiche wie zum Ende der Zeichenfolge notwendig sind, um sie gleich einer Summe der bestimmten Anzahl von Räumen. Dies ermöglicht Ihnen, jede Spalte eine feste Breite Printwerbung 6

Fügen Sie den folgenden , um die Daten in die Datei schreiben : .

X als Integer = 0 bis libraryData.getLength ( 0) - Seite 7

Fügen Sie den folgenden , um die Datei zu schließen :

textWriter.Flush ()

textWriter.Close ()

" Flush " sorgt dafür, dass die letzte der Daten in die Datei geschrieben .