Arquivos largura fixa de texto são um formato de dados no qual as informações são armazenadas em uma série de colunas , cada um de um tamanho fixo , permitindo que qualquer computador que sabe a largura pré-definida de coluna para rapidamente e ler facilmente os dados sem análise especial. Também permite que os dados a serem impressos em tabelas facilmente legíveis pelo ser humano . Entre outras utilizações , os resultados dos comandos MySQL são geralmente fornecidos em formato de largura fixa . Para este exemplo , o programa irá gravar um arquivo de texto de largura fixa para um banco de dados biblioteca com títulos , autores e datas dos livros entraram na biblioteca. Instruções
1

Crie um novo projeto , clicando em " Arquivo", " New Project ". Escolha o tipo " Console Application " . Mais tarde , você pode usar exatamente o mesmo código , sem modificações, como parte de um usuário (GUI) do projeto de interface gráfica do usuário. Nomeie o projeto "Escritor largura fixa ".
2

Cole as seguintes constantes de largura de coluna no topo do código fonte :

Const TITLE_FIELD como inteiro = 25

Const AUTHOR_FIELD como inteiro = 15

Cosnt date_field como inteiro = 10
3

cole os dados da biblioteca para os livros. Ele será colocado em uma matriz chamada libraryData :

Dim libraryData (,) como String =

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

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

Crie um arquivo de texto para escrever como uma largura fixa arquivo de texto e criar um " TextFileWriter " para ele :

Dim arquivo de texto como string = " arquivo.txt "

fraca TextWriter = My.Computer.FileSystem.OpenTextFileWriter ( arquivo de texto , False) < br >

O "Falso" indica que você não deseja anexar os dados para o arquivo.
5

cole o seguinte para escrever a coluna função-chave para isso é a função " PadRight " : este atribui tantos espaços como necessário para o final da string para torná-lo igual a um total de um dado número de espaços. Isso permite que você imprima cada coluna para uma largura fixa
6

Cole o seguinte para gravar os dados no arquivo: .

Para x as integer = 0 a libraryData.getLength ( 0 ) -
7

Cole o seguinte para fechar o arquivo :

textWriter.Flush ()

textWriter.Close ()

" embutida " assegura que a última de os dados terem sido gravados no arquivo .