Visual Basic 6 ( VB6 ) omfattar två metoder för att skriva en fil . Den " Skriv # " uttalande infogar kommatecken mellan varje dataobjekt och citattecken runt strängar eftersom de skrivs till filen . Detta sparar programmeraren behöva skapa avgränsare i en lista över objekt för senare användning under en Inmatningsknappar . Den " Print # ", skriver en bild av data till en fil . I det här fallet måste du lägga till avgränsare till data så att det skrivs ut korrekt . Instruktioner
1
Använd VB6 för att skapa ett nytt projekt genom att välja " Standard EXE " från listan över mallar när VB6 öppnas . För att demonstrera processen filen skriva, skapa ett formulär för att samla in adressinformation , som sedan kommer att skriva en fil adressbok . Använd " Toolbox " i den vänstra kolumnen för att lägga till etiketter , textrutor och CommandButton kontroller till formuläret display för att samla in nödvändig information och skriva filen .
2
Lägg fem Etiketter till formuläret genom att dubbelklicka på kapitalet " A " i verktygslådan fem gånger . Varje etikett täcker den föregående så klicka och dra dem en i taget , placera den översta etiketten längst ned till vänster i formuläret och varje efterföljande Label ovanför den föregående . Upprepa denna process för att lägga fem textrutor från Toolbox genom att dubbelklicka på fem gånger på den lilla fyrkantiga ikonen innehåller gemener " ab . " På formuläret , klicka och dra dem en i taget till höger om etiketter , foder varje upp med sitt matchande Label . Obs : Du behöver antagligen för att förstora formen en aning med hjälp av dra handtag , små fyrkanter i hörnen och i mitten av toppen och botten av formen
3
Lägg tre CommandButtons till formuläret genom . dubbelklicka på den lilla rektangeln i verktygslådan finns direkt nedanför Label ikonen tre gånger . Dra först den ena ovanför den första etiketten och Textruta . Dra de andra två horisontellt under Etiketter och textrutor . Klicka på varje kontroll för att visa dess egenskaper till höger , och ändra " Caption " egenskaper börjar med Label1 enligt nedan , men inte in citattecknen :
Ändra Label1 bildtext till " Name "
Ändra Label2 bildtext till " Street "
Ändra LABEL3 bildtext till " City"
Ändra Label4 bildtext till " staten "
Ändra Label5 bildtext till " ZIP "
Radera "text" egenskaper för alla fem textrutor på samma sätt .
4
Ändra default " Caption " av de tre CommandBoxes till " Skapa fil ", " Spara post " och " Exit ". Klicka på " Visa ", " Kod " i övre VB6 menyn för att öppna koden fönstret . Skriv följande rader precis som de står :
Public WriteFile As String
Private Sub Command1_Click ( ) katalog
WriteFile = InputBox ( " Ange ett filnamn för att skriva i formatet Drive : \\ Mapp \\ filnamn.txt " ) katalog
Öppen WriteFile för utskrift som # 1
Stäng # 1
End Sub
5
Lägg följande kod nedanför koden i Steg 4 :
Private Sub Command2_Click ( ) katalog
Öppen WriteFile för Anslut som # 2 Review
Skriv # 2 , Text1.Text ; Text2 . text , Text3.Text , Text4.Text ; Text5.Text
Close # 2 Review
Text1.Text = " "
Text2.Text = " "
Text3.Text = " "
Text4.Text = " "
Text5.Text = " "
Text1.SetFocus
End Sub
6
Tryck " F5 " för att köra programmet . Klicka på " Skapa fil " knappen och ange en plats och ett filnamn . Fyll i formuläret och klicka på " Spara post . " Upprepa för att lägga till några fler skivor . Avsluta programmet och leta upp filen på datorn där den skapades . Öppna den med Anteckningar i Windows för att se resultatet . Ändra " Skriv " kommando i koden till " Skriv ut " och kör programmet igen . Re - öppna med WordPad för att se skillnaden mellan de två metoderna FIL skriv .
