Notepad er en ren tekst editor tilgjengelig med Windows operativsystem . Dokumenter redigert eller opprettet i Notepad kan lagres med Unicode , ANSI , UTF - 8 eller big- endian Unicode -koding. Andre eksempler på koding er morse og ASCII. Den type koding valgt bestemmer hvordan teksten skal tolkes av datamaskinen . Grunnleggende tekstfiler lagret med " . Txt " forlengelse er vanligvis Unicode. Notepad kan også brukes til å lage websider ved å lagre tekst som " . Html " eller " . Xml ". Instruksjoner
en
Åpne et nytt Standard EXE -prosjekt i VB6. Velg " Prosjekt ", " Komponenter" fra menyen og klikk på boksen ved siden av "Microsoft Rich Tekstboks' kontroll 6.0 ( SP6 ) . " Klikk på " OK "-knappen for å lagre og lukke skjermen . Du må skrive en wrapper for å få tilgang til . NET " FileStream " class . Wrapper bør ha en linje som ser slik ut : "Return New Stream ( StreamParameters ) . "
2
Velg Rich Text Box kontroll fra verktøylinjen, og klikk på skjemaet for å legge til en ny rik tekst Box kontroll heter " RichTextBox1 " som standard. Endre navnet til noe meningsfylt som " rtbNotePad . "
3
Definer en variabel til å holde en fil og navnet på filen . Variabelen for filen nummeret må være et heltall og heter noe sånt som " iFileNum " og variabelen for filnavnet skal være en streng og heter noe sånt som " sMyFile . " Få en gratis filnummer ved koding
4
Åpne Notisblokk-fil og vise innholdet i Rich Text Box " iFileNum = FreeFile . " : En
Åpen sMyFile For Input As iFileNum
innholdet av " sMyFile " kan leses byte av byte eller alle samtidig . For å lese litt etter litt , kode denne linjen " rtbNotepad.text = Input ( 10 , iFileNum ) . " For å lese hele filen , kode denne linjen " rtbNotepad.text = Input ( LOF ( iFileNum ) , iFileNum ) . " " LOF " er " lengden av fil "-funksjonen .
5
Legg til en knapp i skjemaet og gi den navnet " cmdSave " og sette bildetekst på "Lagre". Legge til, fjerne eller redigere innholdet i " rtbNotePad " og klikk på "Lagre "-knappen når du er ferdig . Hvis du vil lagre innholdet i boks for rik tekst kontroll , kode denne linjen " Skriv iFileNum , rtbNotepad.text . "
