Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Vytvorte nový projekt kliknutím na tlačidlo " Súbor " , " New Project " . Vyberte " Aplikácia konzoly " typ . Neskôr , môžete použiť presne rovnaký kód , bez úprav , ako súčasť ( GUI ) projekt grafického užívateľského rozhrania . Názov projektu " Pevná šírka Writer . "
2
Vložte nasledujúce šírky stĺpca konštanty v hornej časti zdrojového kódu :
Const TITLE_FIELD ako integer = 25
Const AUTHOR_FIELD ako integer = 15
Cosnt DATE_FIELD ako integer = 10
3
Vložiť dát knižnice pre knihy . To bude umiestnená do poľa s názvom libraryData :
Dim libraryData ( , ) ako String =
{ { " To Kill a Mockingbird " , " Harper Lee " , " 01/23/2010 " } ,
{ " Stand " , " Stephen King " , " 02/15/1992 " } }
4
Vytvorte textový súbor , ktorý chcete písať ako pevnou šírkou textový súbor a vytvorí " TextFileWriter " pre neho :
Dim textového súboru ako reťazec = " filename.txt "
dim TextWriter = My.Computer.FileSystem.OpenTextFileWriter ( textfile , False )
" False " znamená , že si neželáte pripojiť dáta do súboru .
5
vložte nasledujúci písať stĺpec Hlavnou funkciou tohto je funkcia " PadRight " : to sa viaže toľko miesta ako napríklad na konci reťazca , aby sa rovná súčtu daný počet miest . To vám umožní tlačiť každý stĺpec na pevnú šírku
6
vložte nasledujúci zapísať dáta do súboru : .
X As Integer = 0 libraryData.getLength ( 0 ) -
7
vložte nasledujúci zatvoriť súbor :
textWriter.Flush ( )
textWriter.Close ( )
" Flush " zaisťuje , že posledná údajov bola zapísaná do súboru .