|
Largeur fichiers texte fixes sont un format de données dans laquelle les informations sont stockées dans une série de colonnes , chacune d'une largeur fixe , permettant à tout ordinateur qui connaît la largeur prédéfinie de la colonne de rapidement et lire facilement les données sans analyse particulière . Il permet également aux données à imprimer dans des tableaux facilement lisibles par l'homme . Parmi les autres utilisations , les résultats des commandes MySQL sont généralement donnés en format à largeur fixe. Pour cet exemple, le programme va écrire un fichier texte à largeur fixe pour une base de données de la bibliothèque avec des titres , des auteurs, et les dates des livres entrés dans la bibliothèque . Instructions
1 Créez un nouveau projet en cliquant sur " Fichier", " Nouveau projet ". Choisissez le type " Application console " . Plus tard, vous pouvez utiliser le même code , sans modification , dans le cadre d'une interface utilisateur graphique (GUI) du projet. Nommez le projet " . Writer largeur fixe "
2 Coller les constantes de largeur de colonne suivantes en haut du code source:
Const TITLE_FIELD As Integer = 25
Const AUTHOR_FIELD As Integer = 15
Cosnt date_field As Integer = 10
3 coller les données de bibliothèque pour les livres. Il sera placé dans un tableau nommé libraryData :
Dim libraryData (,) comme String =
{ {" To Kill a Mockingbird ", " Harper Lee ", " 01/23/2010 "} , AB {" The Stand "," Stephen King "," 15/02/1992 "}}
4 Créer un fichier de texte pour écrire une largeur fixe fichier texte et de créer un " TextFileWriter " pour elle:
textfile As string = " filename.txt "
dim TextWriter = My.Computer.FileSystem.OpenTextFileWriter ( fichier texte , false) < br > le "Faux" indique que vous ne souhaitez pas ajouter les données dans le fichier.
5 collez le texte suivant à écrire la colonne fonction clé pour cela est la fonction " PadRight ": cette attache autant d'espaces que nécessaire à la fin de la chaîne pour le rendre égal au total du nombre donné d'espaces . Cela vous permet d'imprimer chaque colonne à une largeur fixe
6 Collez le texte suivant pour écrire les données dans le fichier: .
X As Integer = 0 à libraryData.getLength ( 0) -
7 Collez le texte suivant pour fermer le fichier : Photos textWriter.Flush ()
textWriter.Close ()
« Flush » garantit que la dernière des données ont été écrites dans le fichier .
|
