VB6 Munka menüfájlrendszer példái.
Minden programnak meg kell mentenie az adatokat a lemezre, és olvassa el őket a lemezről. Ez például a programbeállítások mentéséhez nem valószínű, hogy a felhasználó szeretne a programot, hogy a következő alkalommal újra be kell állítani.
Ez a cikkről beszélünk a szöveges fájlokkal való együttműködésről a vizuális alapon.
File fogantyú
Fájlok kezeléséhez operációs rendszer I / O csatornákat használ, azaz mindenki fájl megnyitása Saját számuk van.
A Visual Basic-ban van egy funkció FREEFILE.amely egy ingyenes csatorna-számot ad vissza, amely a fájlhoz való munkához használható. Ha nincs ingyenes csatorna, akkor hiba lép fel.
FREEFILE [(Rangeumber) ]
Rangeumber -Helling paraméter, amely lehetővé teszi, hogy meghatározza a szabad csatorna értékek tartományát, ha Rangeumber \u003d 0 (alapértelmezett), akkor a csatorna számát visszaküldi az 1 - 255 tartományból, és ha 1, akkor a 256 - 511 tartományból.
Myfile \u003d Freedefile. "A MyFile változó ingyenes csatornát rendel hozzá, és most használható a fájlok működésére
Szöveges fájlok kezelése
Leggyakrabban a szöveges fájlokkal kell találkoznod. A szövegfájlok egy készletből állnak aSCII szimbólumok. (Amerikai szabványos kód Információs csomópont. - Amerikai szabványkód Információmegosztáshoz).
Az írás / olvasás megkezdése előtt a fájlt meg kell nyitni, az üzemeltető segítségével történik Nyisd ki (Fájl név) Mint #Ügyirat számaHol:
Bemenet - Nyissa meg az olvasási fájlt, ha a fájl nem létezik, a hiba előfordul;
Kimenet. - A felvételhez, ha a fájl nem létezik, akkor létrehozásra kerül, és ha a fájl létezik, felülíródik;
Mellékel. - Hozzáadni, ha a fájl nem létezik, akkor létrehozásra kerül, és ha a fájl létezik, az adatok hozzáadódnak a fájl végéhez.
A szövegfájlok olvasása kétféleképpen hajtható végre: Olvasás érvényesül, hogy ez a funkciót használja Bemenet (NUMBER_STILE_SIMVOL, #Ügyirat száma) és rine fel erre a funkcióra Line bemenet #Ügyirat száma, -Mi.
Homályos myfile
Dim s karakterlánc "Adat tárolási változó
Myfile \u003d Freedefile.
Nyitott ("c: \\ tos.txt") a #myfile bemenethez
Line bemenet #myfile, s "Olvassa el az első sort a teszt.txt fájlból a S változóhoz
Homályos myfile. "Változtunk egy ingyenes fájlt
Dim i, mint egész "Cycle változó
Dim Ts mint karakterlánc "Változó a karakterláncok olvasásához
Dim s karakterlánc "Változó a végleges adatok tárolásához
Myfile \u003d Freedefile. "Ingyenes csatornát rendelünk a fájlok kezeléséhez
"Nyissa meg a teszt.txt fájlt az olvasáshoz
I \u003d 1-5
Vonal bemenet #myfile, ts "Olvassa el a teszt.txt fájlvonalat
Ha i \u003d\u003e 5, akkor s \u003d ts "Ha az ötödik vonal, akkor emlékezzen rá a változó s
Ezután I.
Close #myfile "bezárás fájl
DIM MYFILE "A szabad fájlhoz változó változót hirdetünk
Dim S mint karakterlánc "tárolási változó Az adatok olvasása
Myfile \u003d Freedefile. "Ingyenes csatornát rendelünk a fájlok kezeléséhez
Nyitott ("c: \\ tos.txt") a #myfile bemenethez "Nyissa meg a teszt.txt fájlt az olvasáshoz
S \u003d Bemenet $ (log (1), 1) "Olvassa el a teljes fájlt a változóban
Close #myfile "bezárás fájl
Az üzemeltetők léteznek írni a fájlba Nyomtatás #Ügyirat száma, Adat és Ír #Ügyirat száma, Adat. Megkülönbözteti ezeket az üzemeltetőket Ír Írja az adatokat idézőjelekben, és Nyomtatás. idézőjelek nélkül.
A következő kód C: \\ lemezen fog létrehozni Új fájl. Teszt.txt, és két sorot fog rögzíteni benne, az első idézetek nélkül, és a második idézetekben:
Homályos myfile "Változtunk egy ingyenes fájlt
Myfile \u003d Freedefile. "Ingyenes csatornát rendelünk a fájlok kezeléséhez
Nyitott ("c: \\ ting.txt") a #myfile kimenethez "Nyissa meg a teszt.txt fájlt a felvételhez
Nyomtatás #myfile, "Ezt a vonalat a nyomtatószervezés rögzíti, ez idézetek nélkül ..."
Írjon #myfile-t, "Ezt a sort az írási operátor rögzíti, ez idézőjelben van ..."
Close #myfile "bezárás fájl
Semmi gond. Ahogy valószínűleg megértette, az üzemeltető a fájl bezárására szolgál Bezárás #Ügyirat száma, ahol, # Ügyirat száma Nem feltétlenül.
A cikk egy kicsit nedves, de az újonc programozók hasznosak lesznek. Legközelebb a bináris fájlok munkájáról beszélek.
8. Az információk mentése és olvasása
A program leállítása után a memóriában létrehozott összes adat nem ment, meg kell tudnia menteni az információkat a merevlemezen. Ellenkező esetben az összes információ nyomkövetés nélkül eltűnik. Adatok mentése és olvasása különböző módon. A különböző mennyiségű és formátumú információkkal való együttműködéshez bináris és szöveges fájlokat használhat. A Windows rendszerleíró adatbázis segítségével kis mennyiségű információt tárolhat. És a legnehezebb feladatokért, ésszerű az adatbázisok használata.
8.1. Fájlok megnyitása a kezelővel "Nyisd ki "
A fájl bármely külső információs meghajtó nevű területe. Az "élő" adatok a számítógép memóriájában, és a fájlok a merevlemezen vannak. A program nem működik közvetlenül a fájlokkal, de az operációs rendszert közvetítőként használja.
Fájlnevek Kétféle típus létezik: teljes - A fájlnév mellett a fájl neve a külső hordozóra is megadva (például "C: \\ Programfájlok \\ Microsoft Visual Studio \\ VB98 \\ VB 6.EXE" ) és röviden - csak fájlnév (vb 6.exe). Ha a fájl helyét nem lehet megadni, akkor az aktuális mappában található, az alapértelmezett mappában, ahol az alkalmazás található. A közvetlen fájlnév két részből áll: a tényleges egyedi fájlnév és bővítése. A név azonosítja a fájlt, és a kiterjesztés általában a fájlformátumot vagy a létrehozott programot jelzi.
Mielőtt elkezdené dolgozni a fájlban, kérnie kell az operációs rendszert. mutató (leíró) fájl. A megszerzéséhez használja a "FreeFILE" funkciót. Ezután a nyitott utasítás segítségével ez a mutató a kívánt fájlhoz kapcsolódik. Csak azt követően, hogy a program képes lesz vele dolgozni. A fájlnyitás szintaxis a következő:
'Szerezzen be egy ingyenes fájl mutatót, és hozzárendelje egy változóhoz
Filhandle% \u003d FreeFile
- Nyissa meg a ferde-t
Nyitott filepath _
Mint [#] Filhandle%
... (Workfile)
Zárja be a [#] Filhandle-t
· A FileHandle% olyan változó, amelyben a fájlmutató tárolódik;
· FREEFILE - A fájl mutatóját visszaadó funkció neve;
· Nyílt - az üzemeltető neve;
· Filepath - teljes fájlnév;
· For - kulcsszó, amelyet a fájl hozzáférési módjának leírása követ;
· Mód - fájl hozzáférési mód (lásd a 15. táblázatot);
15. táblázat.
Fájl hozzáférési módok
Hozzáférési módok |
Leírás |
Mellékel. |
Adatok hozzáadása egy meglévő szövegfájl végéhez. Ha a fájl nem létezik, akkor létrejön |
Bináris. |
Fájl megnyitása bináris módban, azaz Bájtok formájában. Ha a fájl nem létezik, de létrejön |
Bemenet |
Olvasási fájl megnyitása szöveges formátumban |
Kimenet. |
Fájl megnyitása szöveges fájl rögzítéséhez. Ugyanakkor az összes régi információ törlődik. Ha a fájl nem létezik, de létrejön |
Véletlen |
Fájl megnyitása önkényes hozzáférési módban. Ez az üzemmód egyszerű bejegyzésekkel dolgozik. Ha a fájl nem létezik, de létrejön |
· Hozzáférés - opcionális kulcsszó, amelyet a hozzáférés típusának leírása követ;
· AccessType - Hozzáférés típusa Leírás:
· Olvasás - olvasás;
· Írás - felvétel;
· Olvassa el az írást - olvasás és írás.
jegyzet |
A hozzáférési módok hozzáadásával és kimeneti módjakor csak az írási hozzáférés típus elérhető a bemeneten - csak olvasható, és bináris és véletlenszerű, mindhárom típusú hozzáférés rendelkezésre áll. |
· A LockType opcionális paraméter, amely meghatározza, hogy más programok használják-e ezt a fájlt, miközben a program működik vele. Általában a hálózaton végzett munkához kapcsolódik (lásd a 16. táblázatot).
16. táblázat.
A LOCKTYPE paraméter lehetséges értékei
Érték |
Leírás |
Megosztott. |
A fájl teljes hozzáférést biztosít az összes felhasználóhoz a szükséges jogokkal. |
Lock olvasás. |
A fájl olvasása, és a rekord megengedett |
Lock írás. |
Blokkolja a felvételt egy fájlba, és az olvasás megengedett |
Zár Ír olvas. |
Ne olvassa el és írjon neki |
· AS - A kulcsszó, amelyet a fájl mutatója követ.
· # - szimbólum, amely azt jelzi, hogy az érték a következő fájlmutató.
· Len - opcionális kulcsszó, amelyet egy olyan paraméter követ, amely meghatározza a felvételi hosszat.
· CharinBuffer% - Felvételi hossza nyitott, tetszőleges hozzáférési módban (véletlenszerű).
· A Bezárás olyan operátor, amely bezárja a megadott leíróhoz társított fájlt.
Fontos, hogy lezárjuk a fájlt a munka vége után. A "Close" operátor megszabadítja a fájlmutatót és a hozzá tartozó memóriaterületet.
Amikor a fájlban dolgozik, nevezetesen, amikor olvassa el, nagyon fontos meghatározni a fájl végét. Meghatározható az EOF (Fájl vége) funkció használatával:
EoF (Filhandle)
· EOF - funkciónév;
· FileHandle egy fájlmutató, amelynek vége meghatározható.
A függvény igazi (igazság), ha a fájl vége eléri, ellenkező esetben hamis.
8.2. Olvasás és írás szövegfájlba
A szöveges fájl meg van nyitva az „Input”, „Output” vagy „Hozzáad” hozzáférési mód (lásd 15. táblázat). Ennek a rendszernek a sajátossága, hogy csak meghatározott nyomtatott szimbólumokkal működik. A szolgáltatási szimbólumokkal a munka haszontalan.
Az információs felvételhez két nyomtatási és írási szolgáltatót használnak, amelynek szintaxis a következő:
Nyomtatás # FileHandle%, VarBuffer [;]
Írjon # FileHandle%, VarBuffer [;]
· Nyomtatás / írás - Kulcsszavak operátorok.
· # FileHandle% a fájl mutatója, amelyre az információkat elhelyezik.
· Varbuffer érték, amelyet a fájlban rögzítenek.
· ; - A szövegfájl írásakor használt opcionális paraméter azt jelenti, hogy a következő értéket ugyanabban a sorban rögzítik, és a következőre - a következőre.
A fájlból származó információk olvasásához a "bemenet" és a "vonal bemenet" operátorokat használnak. Syntaxichangchendrugdrugua:
Vonalbemenet # FileHandle%, VarBuffer
INPUT # FILEHARLE%, VARBUFFER
· Line bemenet / bemenet - Kulcsszavak operátorok.
· # FileHandle% olyan fájlmutató, amelyből az információt hitték.
· A VARBUFFER olyan változó, amelyben az információk olvashatók.
A vonalbemenet és a bemeneti nyilatkozatok közötti különbség az, hogy az első csak szöveges fájlokra vonatkozik, és a második mindenki számára. A szövegfájlok esetében a bemenet az adatokat egy sorban olvassa az első elválasztóhoz (szövegadatok esetében, a szeparátor "," (vessző), és a numerikus - "" (""), és " Line bemenet "egyszerre olvassa az egész sort, figyelmen kívül hagyja az elválasztókat.
jegyzet |
A Visual Basic nem irányítja a korábban létrehozott fájlok formátumát. Ezért a "2" szimbólum megfelelő számként olvasható, és fordítva. |
8.3. Bináris fájlokkal dolgozva
A Fájlok megnyílnak B. bináris formátum Operátor "nyitott" a "bináris" módban. Ennek a módnak a megkülönböztető jellemzője, hogy a fájlban való munka kizárólag speciális bájtokra koncentrál. Mivel a Visual Basic közvetlenül hozzáadhatja a fájl helyét, ezt az üzemmódot is hívják - közvetlen hozzáférési mód. Ennek a módnak egy másik jellemzője az egyidejű felvétel és az információ olvasási információinak elérhetősége a fájl különböző részeire anélkül, hogy felveszi. A bináris üzemmódban nyitott fájl felvételét a következő szintaxis végzi:
Tedd # FileHandle%, Namevar
· Az információs rögzítő üzemeltető neve.
· Újrahaszos - a fájl bájtszáma, amelyben az információkat rögzítik (opcionális paraméter).
· Névváros - változó, amelynek tartalmát a fájlban rögzítik.
A fájlból származó információk bináris módban történő ellenőrzése a következő operátor segítségével történik:
Get # FileHandle%, Namevar
· Get - az információs felvételi üzemeltető neve.
· FileHandle% - File pointer.
· Újrahasznosító - BYTE A fájl száma, amelyből az információ olvasható (nem szükséges paraméter).
· A NAMEVAR az a változó neve, amelyben az olvasási információkat elhelyezik.
Mivel a bináris mód az információs bájtokra összpontosul, akkor a fájl olvasásakor a pufferváltozónak szigorúan meghatározott típusú: akár "byte", majd a bájt numerikus értéke, vagy a szimbólum rögzített hossza egy karakterben A bájt szimbólumként olvasható, az ANSI kódja, akinek kódja megfelel a bájt értékének. Ez a szimbólum is olyan menedzser lehet, amely nem érhető el szöveges fájlok esetében.
jegyzet |
A "újrahaszk" paraméter hiányában az információ felvétele vagy olvasása a fájl következő paneljében történik, miután dolgozott.
8.4. Manipulációs grafika
A grafikus képeket fájlokban és kivonatban tarthatja meg. A raszterfájlból vagy az ikonfájl eltávolításához és a "PictureBox" és a "kép" vezérlés "kép" tulajdonához hozzárendeli, használja a "LoadPicture ()" funkciót a következő szintaxissal:
Imagectrl.picture \u003d LoadPicture (filepath)
· Imagectrl - az ablakvezérlés neve minta, képvezérlő elem vagy forma;
· LOADPICTURE - A funkció neve;
· Filepath - teljes fájlnév.
Savepicture képecectrl .picture, filepath
· A megmentés az üzemeltető neve;
· Imagectrl - az ablakvezérlés neve minta, képvezérlő elem vagy forma;
· Kép - a képért felelős objektum tulajdonsága;
· Filepath - A fájl teljes neve, amely jelzi a helyét a lemezen.
8.5. Munka a rendszerleíró adatbázisban
A karakterformátumok kis darabjainak tárolásához használhatja a Windows rendszerleíró adatbázisát. A Visual Basic négy eljárással rendelkezik, amelyek hozzáférhetők hozzá. Nagyon könnyen használhatóak, de van egy fő hátránya: csak egy adott rendszerleíró kulcsból érhető el: "MyComputer \\ HKEY _Current _User \\ Software \\ Vb és VBA programbeállítások". A többi rendszerleíró részleghez való hozzáféréshez a WIN 32 API speciális funkcióit kell használnia.
Ahhoz, hogy a paraméter értékét megkapja a Windows rendszerleíró részleg Visual Basic szakaszából, a következő funkciót kell használnia:
MyString \u003d Getating (VBKeyName, szakasz, kulcs [, alapértelmezett])
· A MyString egy karakterlánc a funkció által visszaküldött érték tárolására;
· A funkció neve a funkció neve.
· VBKeyName - A VB / VBA belső alszakaszának neve.
· Kulcs - Olyan karakterlánc, amely a szakasz paraméterének nevét jelöli.
· Az alapértelmezett olyan opcionális érv, amelynek értékét hiba esetén (nincs paraméter).
Néhány értéket a Windows rendszerleíró adatbázisban, a következő üzemeltetőt használjuk:
VBKeyName, szakasz, kulcs, a karakterlánc
· A mentés az üzemeltető neve.
· A MyString olyan karakterláncváltozó, amelyhez az érték kerül.
Annak érdekében, hogy egy sor paraméterértéket tartalmazó rendszerleíró adatbázisból kapjon egy adott alfejezetből, a következő funkciót használják:
Myvariant \u003d setallsettings (VBKeyName, szakasz)
· A Myvariant a "változat" értéke által visszaadott függvény.
· Setallsettings - Funkció neve.
· Szakasz - egy adott alkalmazás szakaszának vagy alszakaszának egy sztring értéke.
A paraméterek teljes szakaszának törléséhez az operátor a következő szintaxissal érvényes:
A VBKEYNAME, szakasz, kulcs törlése
· A Törlés az üzemeltető neve.
Ellenőrizze az önteszt kérdéseit
- Mennyi ideig tárolhatok néhány információt?
- Mi az a fájl?
- Milyen fájlneveket tudsz?
- Hozza a nyitott operátor szintaxisát. Magyarázza el a paraméterek célját.
- Hogyan szervezheti meg több alkalmazás közös hozzáférését egy fájlhoz egyidejűleg?
- Hogyan lehet meghatározni, hogy milyen információk vannak a fájlban?
- Miért dolgozott a fájlban, hogy lezárja?
- Mit lát a szöveg és a bináris fájlok módjainak különbségét?
- Hogyan olvassa el az adatokat és írja a szöveges fájl módban?
- Hogyan olvassa el az adatokat és írjon a bináris fájl módban?
- Mi a különbség a "nyomtatás" és a "írás" operátorok között, amikor dolgozik a fájlokkal?
- Mi a különbség a "bemenet" és a "vonal bemenet" operátorok között, amikor dolgozik a fájlokkal?
- Hogyan dolgozhatok grafikus adatokkal?
- Melyek a Windows rendszerleíró adatbázisának alapelvei?
Munka célja: A VB 6 üzemeltetők tanulása és használata a fájlok kezeléséhez különböző típusok: szekvenciális (szöveges) fájlok, önkényes hozzáférési fájlok, bináris fájlok. A műszer kutatása és használata GYAKORI.Párbeszéd. A fájlok megnyitásához és mentéséhez válassza ki a betűtípust és a színt, valamint az objektum használatát Vágólap.a szövegfragmentumok tárolásához - az egyszerű szövegszerkesztő létrehozásának példáján.
Ellenőrzési kérdések:
1. Milyen módon lehet megnyitni a szövegfájlt? Hogyan kell lezárni a szöveget és bármely más nyitott fájlt?
2. Hogyan nyitva áll az adatok az írásban? Mi a különbség az írási és nyomtatási szolgáltatók között?
3. Hogyan nyitható meg az adatok a szövegfájlból az olvasáshoz? Milyen diffl a többi operátor bemeneti és vonal bemenet? Melyik funkcióval olvasható el a fájlból Állítsa be a számot karakterek? Hogyan kell olvasni az összes fájl karakter?
4. Mi a felhasználói adat típusa és hogyan használják ezt a koncepciót az önkényes hozzáférési fájlok használatakor ( rAF.)?
5. Melyik üzemeltetővel a fájlból rAF. Olvassa el a rekordokat és a fájlt rAF.Új rekordok írnak?
6. Milyen célra az indexet meghatározzák és használják a fájl munkájában rAF.?
7. Melyek a bináris fájlok használatának jellemzői? Hogyan nyithatók meg? Hogyan kell olvasni bináris fájl. és írjon bináris fájlba?
8. Hogyan alkalmazhatom a vezérlést GYAKORI.Párbeszéd. Töltse le a szövegfájl tartalmát egy szövegmezőbe? Hogyan mentse el a szerkesztett szöveget a szövegfájlban ugyanazon vezérlőelem segítségével?
9. Hogyan alkalmazhatom a vezérlést GYAKORI.Párbeszéd. A fájl tartalmának letöltéséhez rTF. területen GazdagSzövegdoboz.? Hogyan lehet menteni a szerkesztett szöveget a fájlban ugyanazon vezérlőelem segítségével rTF.?
10. Hogyan alkalmazhatok elemet GYAKORI.Párbeszéd. A betűtípusparaméterek értékeinek módosítása és a szöveg színének megváltoztatásához az ablakban Szövegdoboz. (vagy az ablakban kiválasztott szövegfragmentum GazdagSzövegdoboz.)?
7.1. Példa. Tekintsünk egy igazolják, belépés egy szöveges fájl (és olvasni a szöveges fájl) „munkavállalók információ” - vonalak, amelyek mindegyike tartalmaz egy azonosító számot, a teljes nevét, születési idejét és a születési hely egyik alkalmazottja. A húrok egy táblázatot alkotnak, amely a képernyő formáján a Combo Box vezérlés utáni 4-es példánya lesz (7.1 ábra), amely létrehozza a fésű objektumok (I) tömböt, amelyben a stílus tulajdonság 1 - SimpleCombo.
Jelölje ki a távoli stringet ", Vbexclamation
Fésű (j) .RemoveNem i
'Doboz Új felvétel Asztal:
Privát sub mnuinsert_click ()
i% \u003d fésű (0) .listindex
HA ÉN.< 0 Then
MsgBox "Jelölje ki a karakterláncot, hogy beillesztse a", Vbexclamation
Fésű (0) .Additem inputbox ("Írja be a számot"), én
Fésű (1) .Additem inputbox ("Teljes név"), én
Fésű (2) .additem inputbox ("Írja be a születés dátumát".), I
Fésű (3) .additem inputbox ("Írja be a születési helyet"), én
"A bejegyzés módosítása a táblázatban:
Privát sub mnuupdate_click ()
i% \u003d fésű (0) .listindex
HA ÉN.< 0 Then
MsgBox "Jelölje ki a változó karakterláncot", Vbexclamation
Fésű (0) .list (i) \u003d inputbox ("Írja be a számot", fésű (0) .list (I))
Fésű (1) .list (i) \u003d inputbox ("Teljes név", fésű (1) .lista (i))
Fésű (2) .list (i) \u003d inputbox ("Írja be a születés dátumát"., Comb (2) .lista (I))
Fésű (3) .lista (i) \u003d inputbox ("Írja be a helyet", fésű (3) .list (i))
"Az egész táblázat törlése:
Privát sub mnuclear_click ()
"A táblázat adatai feltöltése szöveges fájlból:
Privát sub mnuload_click ()
Nyissa meg a "személyt. Txt" a # 1 bemenethez
1. bemenet, zsibbadt, fio, bdate, bloc
Fésű (0) .additem zsibba
Fésű (1) .additem fio
Fésű (2) .additem bdate
Fésű (3) .additem bloc
'Felvételi táblázat információ egy szövegfájlban:
Privát sub mnusave_click ()
N% \u003d fésű (0) .listcount
Nyitott "személy. Txt" a kimenethez, mint # 1
I \u003d 0 - n - 1
zsibba \u003d val (fésű (0) .lista (i))
fio \u003d fésű (1) .lista (i)
bdate \u003d cdate (fésű (2) .lista (i))
bloc \u003d fésű (3) .list (i)
Írjon # 1, zsibbadást, fi-, bagátot, blokkot
"Az alkalmazás leállítása:
Privát sub mnuexit_click ()
7.2. Példa. . Tekintsünk olyan alkalmazást, amely bemutatja az ellenőrzések használatát GYAKORI.Párbeszéd. A fájl megnyitásához és mentéséhez a betűtípusok és a színek kiválasztásához, valamint a szöveg szerkesztése.
Formátumfájl Txt. betöltődik a szövegmezőbe (a 7.2 ábrán látható bal oldali mező) és a formátumfájl RTF. - a területen GazdagSzövegdoboz. (7.2 ábra jobb oldali mező).
tárgy
Osztály
tárgy
Ingatlan
tárgy
Értéktulajdonság
"Általános panelek
párbeszéd
Nyissa meg / Mentés lapként
Könyvjelző betűtípus.
Könyvjelző színe
A táblázat nem akadályozza meg a menüparancs tulajdonságait. Betűtípus, Szín és Szerkesztés.. Az alábbiakban az eljáráskód csak a menüparancsokhoz van. Fájl (Nyisd ki., Mentés. és Mentés.Mint). Kódolása más menüparancsokhoz - a munka második munkájának témája.
Privát sub mnuopen_click ()
CommondiCyog1.showopen.
F $ \u003d CommondInog1.Filename
Ha jobbra (F, 3) \u003d "RTF"
Richtextbox1.loadfile F.
Elseif jobb (F, 3) \u003d "txt"
Nyissa meg az F bemenetet, mint az # 1
S $ \u003d bemenet (N, 1)
Privát sub mnusave_click ()
Commondialog1.showsave
F $ \u003d CommondInog1.Filename
Privát sub mnusaveas_click ()
Commondialog1.showsave
F $ \u003d CommondInog1.Filename
Richtextbox1.Savefile f, rtfrtf
E munka során a hallgatónak 2 feladatot kell teljesítenie.
1. Feladat. A feladat elvégzésének folyamatában a diákok elsajátítják a VB 6 képességben, önkényes hozzáférési fájlokkal ( RAF -véletlenhozzáférésfájl).
Egy adott adatbázis-táblázathoz egy felhasználói adattípust hirdetnek, a változó ezt a típusú (oktatóanyag, 108-112. Oldal) és az eljárásokat használják, amelyekben a felhasználó típusváltozót használják.
Különösen az eljárások végrehajtásra kerülnek a menüparancsokhoz. Írjon fájlbaRAF. és Olvassa el a fájlt.RAF.. A 7.1. Példa szerint az adatok szerkesztéséhez számos objektumot használnak. Combo.Doboz. és menü Szerkesztés. Öt parancs almenüvel: Adj hozzá megjegyzést, Felvétel törlése, Írja be az írást, Felvétel szerkesztése, Tiszta asztal.
1.opció.
Hirdesse a felhasználói adattípust az "Autó" táblázathoz (7.1. Táblázat) Adatbázis "Auto Service".
autó |
autó |
hiba |
A 7.1. Táblázat alsó sorában - a mezők típusai.
2. lehetőség..
Az "Automatikus szolgáltatás" adatbázis "hiba" táblázatához (7.2. Táblázat) felhasználói adattípust hirdethet.
hiba | Név hiba | Költség |
A 7.2. Táblázat alsó sorában - a mezők típusai.
7.1. A 7.1. Példa szerint a megadott műveletek végrehajtják, hogyan működik az 1. ábrán látható menüparancsok működése. 7.1.
2. feladat. A feladat során a diákok kiegészítik a 2. példa alkalmazását olyan új funkciókkal, amelyek lehetővé teszik, hogy ezt az alkalmazást egyszerű szövegszerkesztőnek tekintse.
1.opció GYAKORI.Párbeszéd. A menüparancsok végrehajtása Betűtípus és Szín (almenüvel Színes szimbólumok és Háttérszín). Ezen parancsok használatával meg kell adni a betűtípus kiválasztását (nevét, rajzát és méretét) az ablak kiválasztott szövegfragmenséhez. GazdagSzövegdoboz.A kiválasztott töredék karaktereinek színének kiválasztása, és válassza ki az egész ablak háttérszínét.
Jegyzet: Az objektum beállításakor GYAKORI.Párbeszéd. A betűtípus kiválasztása A tulajdonságok (Egyéni) segítségével be kell állítania az 1, 2 vagy 3 zászló tulajdonságának értékét (lásd a kézikönyvet, 183. oldal).
2. lehetőség.. A vezérlés használata GYAKORI.Párbeszéd. A menüparancsok végrehajtása Szerkesztés. (Almenü Másolat, Vágott. és Paszta.), amelynek kinevezése van másolat vagy eltávolítás A szöveg kiválasztott töredékének vágólapján, valamint betét A vágólap tartalmának kiválasztott helyén.
Jegyzet: Az Exchange pufferhez (objektum Vágólap.) A SETTEXT és GETTEXT módszereket használhatja:
Vágólap. Settext Richtextbox1.Seltext.
Richtextbox1.seltext \u003d vágólap. Gettext