Notepad is een platte tekst editor beschikbaar met het Windows-besturingssysteem . Documenten bewerkt of gemaakt in Kladblok kan worden opgeslagen met Unicode , ANSI , UTF - 8 of big - endian Unicode-codering . Andere voorbeelden van codering zijn morse en ASCII . Het type codering geselecteerd bepaalt hoe de tekst door de computer zal worden geïnterpreteerd . Basistekst bestanden opgeslagen met de extensie ". Txt " extensie zijn meestal Unicode . Memo kan ook gebruikt worden om webpagina's te maken door de tekst op te slaan als ' . Html "of" . Xml . ' Instructies
1 Open een nieuw standaard-EXE -project in Visual Basic 6 . Selecteer " Project ", " componenten" in het menu en klik op het selectievakje naast " Microsoft Rich Textbox Controle 6.0 ( SP6 ) . " Klik op de knop " OK " om het scherm te slaan en te sluiten . U moet een wrapper schrijven voor toegang tot de . NET " FileStream " class . De wrapper dient een regel die eruit ziet als dit: " Return Nieuwe Stroom ( StreamParameters ) . " Kopen van 2 Selecteer de Rich Text Box controle van de werkbalk en klik op het formulier om een nieuwe Rich Text toevoegen box controle genaamd " RichTextBox1 " standaard . Hernoem het naar iets zinvols zoals " rtbNotePad . "
3 Definieer een variabele naar een dossiernummer en de naam van het bestand te houden . De variabele voor het bestand nummer moet een geheel getal en een naam als " iFileNum " en de variabele voor de bestandsnaam moet een string en de naam iets als te zijn " sMyFile . " Ontvang een gratis dossiernummer door het coderen
4 Open het Kladblok-bestand en de inhoud in de Rich Text Box " iFileNum = FreeFile . " : Open sMyFile
Voor Input Als iFileNum < br > De inhoud van " sMyFile " kan worden gelezen byte voor byte of allemaal tegelijk . Te lezen beetje bij beetje , code deze lijn " rtbNotepad.text = ingang ( 10 , iFileNum ) . " Om het hele bestand , code lezen deze lijn " rtbNotepad.text = Input ( LOF ( iFileNum ) , iFileNum ) . " " LOF " is de " lengte van de file" functie .
5 Voeg een knop toe aan het formulier en noem het " cmdSave " en stel de titel op 'Opslaan'. Toevoegen, verwijderen of wijzigen van de inhoud van " rtbNotePad " en klik op de knop "Opslaan" als u klaar bent . Om de inhoud van de rijke tekstvak , code deze lijn " Write iFileNum , rtbNotepad.text . "
Opslaan |
