Anteckningar är en textredigerare tillgängliga med operativsystemet Windows . Dokument redigerats eller skapats i Anteckningar kan sparas med Unicode , ANSI , UTF - 8 eller big - endian Unicode-kodning . Andra exempel på kodning är morsekod och ASCII . Den typ av kodning valts avgör hur texten ska tolkas av datorn . Grundläggande textfiler som lagras med " . Txt " förlängning är oftast Unicode . Anteckningar kan också användas för att skapa webbsidor genom att spara texten som " . Html " eller " . Xml . " Instruktioner
1
Öppna ett nytt Standard-EXE- projekt i VB6 . Välj " Project", "Komponenter " från menyn och klicka på kryssrutan bredvid " Microsoft Rich Textruta Control 6.0 ( SP6 ) . " Klicka på " OK " -knappen för att spara och stänga fönstret . Du kommer att behöva skriva en wrapper för att komma åt . NET " FileStream " klass . Omslaget bör ha en rad som ser ut så här : " return new Stream ( StreamParameters ) . "
2
Välj Rich kontroll Textruta i verktygsfältet och klicka på formuläret för att lägga till en ny Rich Text Box kontroll som heter " RichTextBox1 " som standard . Döp den till något meningsfullt som " rtbNotePad . " Addera 3
Definiera en variabel för att hålla en fil nummer och namnet på filen . Variabeln för filnumret ska vara ett heltal och heter något i stil med " iFileNum " och variabeln för filnamnet ska vara en sträng och heter något i stil med " sMyFile . " Skaffa en gratis filnummer genom kodning
4
Öppna Anteckningar -filen och visa innehållet i Rich Text Box " iFileNum = FreeFile . " :
Open sMyFile För Input Som iFileNum
innehållet i " sMyFile " kan läsas byte av byte eller alla på en gång . För att läsa lite i taget , kod här raden " rtbNotepad.text = Input ( 10 , iFileNum ) . " För att läsa hela filen , koden här raden " rtbNotepad.text = Input ( LOF ( iFileNum ) , iFileNum ) . " " LOF " är " längd file " -funktion .
5
Lägg till en knapp i formuläret och kalla den " cmdSave " och sätta dess bildtext till " Spara ". Lägg till, ta bort eller redigera innehållet i " rtbNotePad " och klicka på " Spara " -knappen när du är klar . Om du vill spara innehållet i RTF- rutan kontroll , kod Denna linje " Skriv iFileNum , rtbNotepad.text . " Addera