Visual Basic 6.0 biedt een eenvoudige manier om tekstbestanden openen en lezen hun inhoud in een tekstvak op het scherm , evenals nieuwe tekst naar een bestand te schrijven . Slechts elf regels code nodig voor de eerste stap , en tien zal volstaan voor de tweede operatie . Het proces maakt gebruik van de Input en Output -functies in Visual Basic , evenals een klein venster om informatie te verzamelen van de gebruiker . Wat je nodig hebt Visual Basic 6.0 Toon Meer Aanwijzingen 1 Open Visual Basic 6.0 , klikt u op Bestand en kies Nieuw Project . Selecteer Standard EXE uit de lijst met sjablonen . Dubbelklik op het deTextBoxbesturingselement in de Toolbox aan de linkerkant om deze aan het formulier toe te voegen . Verander de hoogte van het formulier in het deelvenster Eigenschappen van het recht op 5000 2 Maak de volgende wijzigingen in de TextBox Eigenschappen : . Hoogte = 3000Multiline = TrueScrollbars = BothWidth = 3000 Goedkope 3 Dubbelklik op het besturingselement Button in de Toolbox . Wijzig de eigenschap Bijschrift naar bestand lezen . Herhaal de procedure om een tweede knop controle toe te voegen , verandert hier de eigenschap Bijschrift voor File schrijven . 4 Dubbelklik op de Read knop Bestand om het venster code te openen . Voer deze code op de code pagina te bekijken : Functie ReadFile ( ) Dim ReadFileName Zoals StringReadFile = InputBox ( " Voer de naam van het bestand te lezen : ' ) Open ReadFile Voor Input Zoals # 1ReadFile = Input $ ( LOF ( 1 ) , 1 ) Text1 . text = ReadFileClose # 1End FunctionPrivate Sub Command1_Click ( ) ReadFileEnd Sub 5 Dubbelklik op de Write knop Bestand om het venster code te openen . Voer deze code : Function WriteFile ( ) Dim WriteFileName Zoals StringWriteFileName = InputBox ( " Voer de naam bestand" ) Open WriteFileName Voor Output Zoals # 2Print # 2 , # Text1.TextClose 1End FunctionPrivate Sub Command2_Click ( ) WriteFileEnd Sub 6 Start het programma door op F5 te drukken en klik op de Read commando File eerste . Voer de naam van een bekende tekstbestand , waaronder het . Txt suffix . Het bestand wordt weergegeven in het tekstvak . Als je nu klikt op Write File en een andere naam , zult u een nieuwe , maar duplicaat bestand te maken . Als alternatief , als je de tekst te verwijderen of klik op Bestand lezen voordat u een bestand en typ iets nieuws , kunt u een volledig nieuw bestand te maken .
|