Gebruik VB6 1 om een ​​nieuw project aan te maken door het selecteren van " Standard EXE " uit de lijst met sjablonen bij VB6 opent . Om het bestand te schrijfproces te tonen , maakt u een formulier om mailing informatie , die vervolgens zal een adresboek bestand te schrijven verzamelen . Gebruik de " Toolbox " in de linker kolom op Etiketten , tekstvakken en CommandButton besturingselementen toe te voegen aan het formulier scherm om de nodige informatie te verzamelen en schrijven van het bestand . Kopen van 2

In vijf labels aan de vorm door te dubbelklikken op op de kapitaalmarkt " A " in de Toolbox vijf keer . Elk label heeft betrekking op het voorgaande dus klik en sleep ze een voor een , het plaatsen van de top Label in de linkerbenedenhoek van het formulier en elke volgende Label boven de vorige. Herhaal dit proces tot vijf Textboxes uit de Toolbox toevoegen door te dubbelklikken vijf keer op het kleine vierkant pictogram met de kleine letters " ab . " Op het formulier , klikt en sleept u ze een voor een aan de rechterkant van de etiketten , voering elk met zijn bijpassende Label . Opmerking : Je moet waarschijnlijk vergroten de vorm enigszins door ze te slepen handvatten , kleine vierkantjes op de hoeken en halverwege de boven-en onderkant van het formulier
3

Voeg drie CommandButtons aan het formulier door . dubbelklikken op het kleine rechthoek in de Toolbox gevonden direct onder het pictogram Label drie keer . Sleep de eerste boven de eerste label en tekstvak . Sleep de andere twee horizontaal onder de labels en tekstvakken . Klik op elke controle om de eigenschappen weer te geven op de juiste , en verander de " Caption " eigenschappen te beginnen met Label1 zoals hieronder , maar niet plaats de aanhalingstekens :

Change Label1 bijschrift
om " Name "

Change Label2 bijschrift op " straat "

Change Label3 bijschrift
naar "City "

Change
Label4 bijschrift naar "staat "

Change Label5 bijschrift
naar " ZIP " < br >

Verwijder de " Text" eigenschappen van alle vijf Textboxes op dezelfde manier .
4

Wijzig de standaard " Caption " van de drie CommandBoxes naar "Bestand maken ", " Record opslaan " en " Exit ". Klik op " View ", "Code" in het bovenste VB6 menu om de code-venster te openen . Typ de volgende regels precies zoals ze worden weergegeven :

Public WriteFile
als Koord

Private Sub Command1_Click ( )

WriteFile = InputBox
( " Voer een bestandsnaam te schrijven in het formaat Drive : \\ Folder \\ bestandsnaam.txt " )

Open WriteFile
Voor Output Zoals # 1

Close # 1

End Sub
5

de volgende code onder de code in Stap 4 :

Private Sub Command2_Click
( )

Open WriteFile
Voor Append Zoals # 2

Schrijf beelden # 2 , Text1.Text ; Tekst2 . tekst , Text3.Text ; Text4.Text ; Text5.Text

Sluiten # 2

Text1.Text = " "

Text2.Text
= " "

Text3.Text = " "

Text4.Text
= " "

Text5.Text
= " "

Text1.SetFocus

End Sub
< br >

Druk op " F5 " 6 om het programma uit te voeren . Klik op de knop "Create File " en voer de locatie en bestandsnaam . Vul het formulier in en klik op ' Opslaan Record . " Herhalen om nog een paar records toevoegen . Verlaat het programma en zoek het bestand op uw pc waar het is gemaakt . Open het met Windows Kladblok om de resultaten te zien . Verander de " Write" commando in de code op " Print " en start het programma opnieuw . Heropen met WordPad om het verschil tussen de twee bestand schrijfmethoden zien .