Visual Basic 6.0 ger ett enkelt sätt att öppna textfiler och läsa deras innehåll i en textruta på skärmen , samt skriva ny text till en fil . Bara elva rader kod krävs för det första steget , och tio kommer att räcka för den andra operationen . Processen använder in-och utgångar i Visual Basic , samt ett litet fönster för att samla in information från användaren . Saker du behöver Review, Visual Basic 6.0
Visa fler instruktioner
1
Öppna Visual Basic 6.0 , klicka på Arkiv och välj Nytt projekt . Välj Standard EXE från listan med mallar . Dubbelklicka på textrutan kontrollen i verktygslådan till vänster för att lägga till detta i formuläret . Ändra höjden på formulär i fönstret Egenskaper till höger för att 5000 köpa 2
Gör följande ändringar i textrutan Egenskaper : . Höjd = 3000Multiline = TrueScrollbars = BothWidth = 3000
3
Dubbelklicka på knappen kontrollen i verktygslådan . Ändra Bildtext egenskapen Läs fil . Upprepa detta för att lägga till en andra knapp kontroll , ändra Bildtext fastighet här för att skriva filen .
4
Dubbelklicka på läsa filen för att öppna koden fönstret . Ange denna kod på code view sidan : Function ReadFile ( ) Dim ReadFileName Som StringReadFile = InputBox ( " Ange namn på filen för att läsa : " ) Öppen ReadFile För Input Som # 1ReadFile = Input $ ( LOF ( 1 ) , 1 ) Text1 . text = ReadFileClose # 1End FunctionPrivate Sub Command1_Click ( ) ReadFileEnd Sub
5
Dubbelklicka på knappen filskrivningsläge att öppna koden fönstret . Ange denna kod : Function WriteFile ( ) Dim WriteFileName Som StringWriteFileName = InputBox ( " Ange filnamn " ) Öppen WriteFileName för utskrift som # 2Print # 2 , Text1.TextClose # 1End FunctionPrivate Sub Command2_Click ( ) WriteFileEnd Sub
6
Kör programmet genom att trycka på F5 och klicka på Läs Filkommandona först . Ange namnet på ett känt textfil , inklusive . Txt ändelsen . Filen ska visas i textrutan . Om du nu klickar på filskrivningsläge och ge ett annat namn , kommer du att skapa en ny men dubblett fil . Alternativt , om du tar bort text eller klicka på Läs fil innan du laddar en fil och sedan skriva något nytt , kan du skapa en helt ny fil . Addera
