Sistem de fișiere sub forma unei liste în vb6. Citirea și scrierea într-un fișier text

Fiecare program trebuie să salveze datele pe disc și să le citească de pe disc. Acest lucru este necesar, de exemplu, pentru a salva setările programului; este puțin probabil ca utilizatorului să-i placă programul, care va trebui configurat din nou la următoarea lansare.

În acest articol vom vorbi despre lucrul cu fișiere text folosind Visual Basic.

Descriptor de fișier

Pentru a lucra cu fișiere sistem de operare utilizează canale I/O, de ex. fiecare deschide fișierul are propriul său număr.

În Visual Basic există o funcție FreeFile, care returnează numărul unui canal gratuit care poate fi folosit pentru a lucra cu fișierul. Dacă nu există canale gratuite, apare o eroare.

FreeFile[(RangeNumber) ]

RangeNumber-parametru opțional care vă permite să definiți intervalul de valori ale canalelor libere dacă RangeNumber= 0 (implicit), atunci numărul canalului este returnat din intervalul 1 - 255, iar dacă 1, atunci din intervalul 256 - 511.

MyFile = Fișier gratuit „Variabilei MyFile i s-a atribuit un canal gratuit și poate fi acum folosită pentru a lucra cu fișiere

Lucrul cu fișiere text

Cel mai adesea întâlniți fișiere text. Fișierele text constau din setul de caractere ASCII (American Standard Code for Information Interchange).

Înainte de a începe scrierea/citirea datelor, fișierul trebuie deschis; acest lucru se face cu ajutorul operatorului Deschis (Nume de fișier) Pentru noi #Numărul fișierului, Unde:

Intrare- deschideți fișierul pentru citire, dacă fișierul nu există, apare o eroare;

Ieșire- pentru scriere, daca fisierul nu exista se va crea, iar daca fisierul exista se va suprascrie;

Adăuga- pentru a adăuga, dacă fișierul nu există, acesta va fi creat, iar dacă fișierul există, atunci datele vor fi adăugate la sfârșitul fișierului.

Citirea fișierelor text se poate face în două moduri: citiți caracter cu caracter, pentru aceasta folosiți funcția Intrare(Număr_de_caractere_citite, #Numărul fișierului) și linie cu linie, funcția este folosită pentru aceasta Linie de intrare #Numărul fișierului, Unde_s citesc.

Dim MyFile

Dim S As String „Variabilă pentru stocarea datelor citite

MyFile = Fișier gratuit

Deschideți ("C:\TEST.txt") pentru introducere ca #MyFile

Intrare linie #MyFile, S „Citiți prima linie din fișierul TEST.TXT în variabila S

Dim MyFile „Declarați o variabilă pentru un fișier gratuit

Dim i ca întreg „Variabilă pentru buclă

Dim tS As String „Variabilă pentru citirea șirurilor

Dim S As String „Variabilă pentru stocarea datelor finale

MyFile = Fișier gratuit „Atribuirea unui canal gratuit pentru lucrul cu fișierele

„Deschideți fișierul TEST.TXT pentru citire

Pentru i = 1 până la 5

Linie de intrare #MyFile, tS „Citirea fișierului TEST.TXT linie cu linie

Dacă i => 5 Atunci S = tS „Dacă a cincea linie, atunci stocați-o în variabila S

Apoi eu

Închide #MyFile „Închide fișierul

Dim MyFile „Declarați o variabilă pentru un fișier gratuit

Dim S As String "Variabilă pentru stocarea datelor citite

MyFile = Fișier gratuit „Atribuirea unui canal gratuit pentru lucrul cu fișierele

Deschideți ("C:\TEST.txt") pentru introducere ca #MyFile „Deschideți fișierul TEST.TXT pentru citire

S = Intrare$(LOG(1), 1) „Citiți întregul fișier în variabila S

Închide #MyFile „Închide fișierul

Există operatori pentru scrierea într-un fișier Imprimare #Numărul fișierului, DateȘi Scrie #Numărul fișierului, Date. Singura diferență dintre acești operatori este că Scrie scrie datele între ghilimele și Imprimare fără ghilimele.

Următorul cod va crea un nou fișier TEST.TXT pe unitatea C:\ și va scrie două linii pe acesta, prima fără ghilimele și a doua cu ghilimele:

Dim MyFile „Declarați o variabilă pentru un fișier gratuit

MyFile = Fișier gratuit „Atribuirea unui canal gratuit pentru lucrul cu fișierele

Deschideți ("C:\TEST.txt") pentru ieșire ca #MyFile „Deschideți fișierul TEST.TXT pentru scriere

Print #MyFile, "Această linie a fost scrisă de operatorul Print, este fără ghilimele..."

Scrie #MyFile, „Această linie a fost scrisă de operatorul Write, este între ghilimele...”

Închide #MyFile „Închide fișierul

Asta e tot. După cum probabil ați înțeles deja, operatorul este folosit pentru a închide un fișier Închide #Numărul fișierului, în care, # Numărul fișierului nu este necesar să se indice.

Articolul este puțin grosolan, dar va fi util pentru programatorii începători. Data viitoare voi vorbi despre lucrul cu fișiere binare.

Windows

Scopul lucrării: Învățarea și utilizarea operatorilor de limbă VB 6 pentru a lucra cu fișiere tipuri variate: fișiere secvențiale (text), fișiere cu acces aleatoriu, fișiere binare. Cercetarea și utilizarea instrumentului UzualDialog pentru deschiderea și salvarea fișierelor, alegerea fontului și a culorii și utilizarea obiectului Clipboard pentru stocarea fragmentelor de text, folosind exemplul creării unui editor de text simplu.

Întrebări de control:

1. În ce moduri puteți deschide un fișier text? Cum se închide un text sau orice alt fișier deschis?

2. Cum sunt scrise datele într-un fișier text care este deschis pentru scriere? Care este diferența dintre instrucțiunile Write și Print?

3. Cum sunt citite datele din deschis pentru citire fisier text? În ce mod sunt diferiți operatorii de intrare și de intrare de linie unul de celălalt? Ce funcție poate fi folosită pentru a citi un anumit număr de caractere dintr-un fișier? Cum să citești toate caracterele unui fișier?

4. Ce este tip personalizat date și modul în care acest concept este utilizat atunci când lucrați cu fișiere cu acces aleatoriu ( raf)?

5. Folosind care operatori din fișier rafînregistrările sunt de asemenea citite în fișier raf Sunt scrise intrări noi?

6. În ce scop este determinat și utilizat indexul atunci când se lucrează cu un fișier? raf?

7. Care sunt caracteristicile utilizării fișierelor binare? Cum se deschid? Cum se citește dintr-un fișier binar și se scrie într-un fișier binar?

8. Cum se utilizează controlul UzualDialog pentru a încărca conținutul unui fișier text într-un câmp de text? Cum pot folosi același control pentru a salva textul editat într-un fișier text?

9. Cum se utilizează controlul UzualDialog pentru a descărca conținutul fișierului rtfîn câmp BogatCasetă de text? Cum să utilizați același control pentru a salva textul editat într-un fișier rtf?

10. Cum se utilizează controlul UzualDialog pentru a modifica valorile parametrilor fontului și pentru a schimba culoarea textului în fereastră Casetă de text(sau o bucată de text selectată în fereastră BogatCasetă de text)?

Exemplul 7.1. Luați în considerare o aplicație care demonstrează scrierea într-un fișier text (și citirea dintr-un fișier text) „informații despre angajat” - rânduri, fiecare dintre acestea conținând numărul de identificare, numele complet, data nașterii și locul nașterii angajatului. Rândurile formează un tabel, care formular de ecran va simula 4 controale Combo Box (Fig. 7.1), formând o matrice de obiecte Comb(i), a căror proprietate Style are valoarea 1 – SimpleCombo.

Selectați linia de șters”, vbExclamation

Comb(j).RemoveItem i

'Introduce intrare nouă la masa:

Sub privat mnuInsert_Click()

i% = Comb(0).ListIndex

Dacă eu< 0 Then

MsgBox „Evidențiați linia care trebuie inserată înaintea acesteia”, vbExclamation

Comb(0).AddItem InputBox(„Introduceți numărul”), i

Comb(1).AddItem InputBox("Introduceți numele dvs."), i

Comb(2).AddItem InputBox(„Introduceți ziua ta de naștere.”), i

Comb(3).AddItem InputBox(„Introduceți locul nașterii.”), i

‘ Modificarea unei intrări în tabel:

Sub privat mnuUpdate_Click()

i% = Comb(0).ListIndex

Dacă eu< 0 Then

MsgBox „Evidențiați rândul care trebuie modificat”, vbExclamation

Comb(0).List(i) = InputBox(„Introduceți numărul”, Comb(0).List(i))

Comb(1).List(i) = InputBox("Introduceți numele dvs.", Comb(1).List(i))

Comb(2).List(i) = InputBox("Introduceți ziua dvs. de naștere.", Comb(2).List(i))

Comb(3).List(i) = InputBox(„Introduceți locul nașterii.”, Comb(3).List(i))

„Ștergerea întregului tabel:

Sub privat mnuClear_Click()

‘ Completarea unui tabel cu informații dintr-un fișier text:

Sub privat mnuLoad_Click()

Deschideți „persoană. txt” pentru intrare ca #1

Intrare #1, amorțit, fio, bdate, bloc

Comb(0).AddItem numb

Comb(1).AddItem fio

Comb(2).AddItem bdate

Comb(3).AddItem bloc

‘ Scrierea informațiilor din tabel într-un fișier text:

Sub privat mnuSave_Click()

N% = Comb(0).ListCount

Deschideți „persoană. txt” pentru ieșire ca #1

Pentru i = 0 la N - 1

amorțit = Val(Comb(0).List(i))

fio = Comb(1).List(i)

bdate = CDate(Comb(2).List(i))

bloc = Comb(3).List(i)

Scrie #1, amorțit, fio, bdate, bloc

„Închiderea aplicației:

Private Sub mnuExit_Click()

Exemplul 7.2 . Luați în considerare o aplicație care demonstrează utilizarea controalelor UzualDialog pentru a deschide și a salva un fișier, pentru a selecta un font și o culoare și pentru a edita text.

Tipul fisierului TXT va fi încărcat în câmpul de text (câmpul din stânga din Fig. 7.2) și în formatul fișierului RTF- în câmp BogatCasetă de text(marginea din dreapta în Fig. 7.2).

obiect

Clasă

obiect

Proprietate

obiect

Valoarea proprietății

„Panouri generale

dialog"

Deschideți/Salvați ca filă

fila Font

Fila Culoare

Tabelul nu arată proprietățile comenzilor de meniu Font, CuloareȘi Editați | ×. Mai jos este codul de procedură și numai pentru comenzile din meniu Fişier (Deschis, SalvațiȘi SalvațiLa fel de). Alcătuirea codului pentru alte comenzi de meniu este subiectul celei de-a doua sarcini a acestei lucrări.

Sub privat mnuOpen_Click()

CommonDialog1.ShowOpen

F$ = CommonDialog1.FileName

Dacă Dreapta (F, 3) = "rtf" Atunci

RichTextBox1.LoadFile F

ElseIf Right(F, 3) = "txt" Atunci

Deschideți F pentru intrare ca #1

S$ = Intrare (N, 1)

Sub privat mnuSave_Click()

CommonDialog1.ShowSave

F$ = CommonDialog1.FileName

Sub privat mnuSaveAs_Click()

CommonDialog1.ShowSave

F$ = CommonDialog1.FileName

RichTextBox1.SaveFile F, rtfRTF

În timpul acestei lucrări, elevul trebuie să îndeplinească 2 sarcini.

Exercitiul 1. În procesul de finalizare a sarcinii, studenții stăpânesc capacitățile disponibile în VB 6 pentru a lucra cu fișiere cu acces aleatoriu ( RAFAleatoriuaccesfişier).

Pentru un anumit tabel al bazei de date, este declarat un tip de date utilizator, o variabilă de acest tip (tutorial, pp. 108–112), procedurile care utilizează o variabilă tip utilizator sunt compilate și depanate.

În special, sunt implementate proceduri pentru comenzile de meniu Scrieți la dosarRAFȘi Citiți din fișierRAF. Ca și în exemplul 7.1, o matrice de obiecte este utilizată pentru a edita datele ComboCutieși meniu Editați | × cu cinci comenzi de submeniu: Adaugă o notiță, Ștergeți intrarea, Introduceți intrarea, Editați intrarea, Șterge masa.

Opțiunea 1.

Declarați un tip de date personalizat pentru tabelul „Mașină” (Tabelul 7.1) din baza de date „Serviciul auto”.

mașină

mașină

defecțiuni

Linia de jos a tabelului 7.1 arată tipurile de câmpuri.

Opțiunea 2.

Declarați un tip de date personalizat pentru tabelul „Defecte” (Tabelul 7.2) din baza de date „Serviciul auto”.

defecțiuni

Nume

defecțiuni

Preț

Linia de jos a tabelului 7.2 prezintă tipurile de câmpuri.

Folosind Exemplul de aplicație 7.1 ca șablon, organizați introducerea și editarea datelor pentru tabelul afișat, scrieți acele date într-un fișier cu acces aleatoriu și citiți datele dintr-un fișier cu acces aleatoriu. Ca și în exemplul 7.1, aceste acțiuni sunt implementate ca operarea comenzilor de meniu prezentate în Fig. 7.1.

Sarcina 2. În timpul temei, studenții adaugă noi caracteristici la aplicația exemplu 2 care permit ca aplicația să fie vizualizată ca un simplu editor de text.

Opțiunea 1 UzualDialog implementează comenzile din meniu FontȘi Culoare(cu submeniu Culoarea caracteruluiȘi Culoare de fundal). Folosind aceste comenzi, ar trebui să puteți selecta un font (numele, stilul și dimensiunea acestuia) pentru fragmentul de text selectat în fereastră BogatCasetă de text, precum și selectarea culorii caracterelor fragmentului selectat și selectarea culorii de fundal a întregii ferestre.

Notă: La instalarea unui obiect UzualDialog Pentru a selecta un font folosind proprietatea (Personalizat), asigurați-vă că setați valoarea proprietății Flags la 1, 2 sau 3 (vezi manualul, pagina 183).

Opțiunea 2. Folosind un control UzualDialog implementează comenzile din meniu Editați | ×(submeniu Copie, A tăiaȘi Pastă), al cărui scop este copierea sau ştergereîn clipboard-ul fragmentului de text selectat și, de asemenea introduce la zona de text selectată a conținutului clipboard-ului.

Notă:În clipboard (obiect Clipboard) puteți folosi metodele SetText și GetText:

Clipboard. SetText RichTextBox1.SelText

RichTextBox1.SelText = Clipboard. GetText

8. SALVAREA ȘI CITIREA INFORMAȚIILOR

Pentru a vă asigura că toate datele create în memorie nu se pierd după finalizarea programului, trebuie să puteți salva informații pe hard disk. În caz contrar, toate informațiile vor dispărea fără urmă. Datele pot fi stocate și citite într-o varietate de moduri. Pentru a lucra cu informații de diferite dimensiuni și formate, puteți utiliza fișiere binare și text. Pentru a stoca cantități mici de informații, puteți utiliza registry Windows. Și pentru cele mai complexe sarcini, este înțelept să folosiți baze de date.

8.1. Deschiderea fișierelor folosind operatorul "Deschis "

Un fișier este o zonă denumită a oricărui dispozitiv de stocare extern. Datele „vii” în memoria computerului, iar fișierele trăiesc pe hard disk. Programul nu funcționează direct cu fișierele, ci folosește sistemul de operare ca intermediar.

Există două tipuri de nume de fișiere: complete - pe lângă numele fișierului, este indicată și locația fișierului pe medii externe (de exemplu, „C:\Program Files\Microsoft Visual Studio\VB98\VB 6.EXE” ) și scurt - doar numele fișierului (VB 6.EXE ). Dacă locația fișierului nu este specificată, acesta va fi căutat în folderul curent, implicit folderul în care se află aplicația dvs. Numele fișierului imediat constă din două părți: numele unic real și extensia acestuia. Numele în sine identifică fișierul, iar extensia indică de obicei formatul fișierului sau programul prin care a fost creat.

Înainte de a începe să lucrați cu fișierul, trebuie să întrebați sistemul de operare indicator (descriptor) fişier. Pentru a-l obține, utilizați funcția „FreeFile”. Apoi, folosind operatorul „Deschidere”, acest indicator este asociat cu fișierul necesar. Numai după aceasta programul va putea lucra cu el. Sintaxa pentru deschiderea unui fișier este următoarea:

„obțineți un indicator de fișier gratuit și atribuiți-l unei variabile

FileHandle% = Fișier gratuit

‘deschideți fișierul

Deschideți FilePath_

Ca [#]FileHandle%

...(lucru cu un fișier)

Închideți [#]FileHandle

· FileHandle % – o variabilă care stochează indicatorul fișierului;

· FreeFile – numele funcției care returnează indicatorul fișierului;

· Open – numele operatorului;

· FilePath – numele complet al fișierului;

· Pentru – un cuvânt cheie urmat de o descriere a modului de acces la fișier;

· Mod – mod de acces la fișiere (vezi Tabelul 15);

Tabelul 15

Moduri de acces la fișiere

Moduri de acces

Descriere

Adăuga

Adăugarea datelor la sfârșitul unui fișier text existent. Dacă fișierul nu există, acesta va fi creat

Binar

Deschiderea unui fișier în modul binar, de ex. ca un set de octeți. Dacă fișierul nu există, dar va fi creat

Intrare

Deschiderea unui fișier pentru citire în format text

Ieșire

Deschideți un fișier pentru a scrie un fișier text. În acest caz, toate informațiile vechi vor fi șterse. Dacă fișierul nu există, dar va fi creat

Aleatoriu

Deschiderea unui fișier în modul de acces aleatoriu. Acest mod este folosit pentru a lucra cu înregistrări simple. Dacă fișierul nu există, dar va fi creat

· Acces – un cuvânt cheie opțional urmat de o descriere a tipului de acces;

· AccessType – descrierea tipului de acces:

· Citiți – citiți;

· Scrie – înregistrează;

· Citiți Scrieți – citiți și scrieți.

Notă

Cu modurile de acces Adăugare și Ieșire, numai tipul de acces Scriere este disponibil, cu Input doar Citire și cu Binary și Random toate cele trei tipuri de acces sunt disponibile.

· LockType este un parametru opțional care determină dacă alte programe pot folosi acest fișier în timp ce programul tău lucrează cu el. Este de obicei asociat cu lucrul în rețea (vezi Tabelul 16).

Tabelul 16

Valori posibile pentru parametrul LockType

Sens

Descriere

Impartit

Toți utilizatorii cu drepturile necesare vor avea acces deplin la fișier

Blocare Citire

Citirea fișierului este blocată, dar scrierea este permisă

Blocare Scriere

Scrierea în fișier este blocată, dar citirea este permisă

Blocare Citire Scriere

Atât citirea cât și scrierea în el sunt interzise

· La fel și un cuvânt cheie urmat de un indicator de fișier.

· # este un simbol care indică faptul că valoarea care urmează este un pointer de fișier.

· Len este un cuvânt cheie opțional care trebuie urmat de un parametru care specifică lungimea intrării.

· CharInBuffer % - lungimea înregistrării pentru un fișier deschis în modul de acces aleatoriu (Random).

· Închidere este o instrucțiune care închide fișierul asociat cu mânerul specificat.

Este important să închideți un fișier când ați terminat de lucrat cu el. Instrucțiunea „Închidere” eliberează indicatorul fișierului și zona de memorie asociată.

Când lucrați cu un fișier, și anume când citiți din acesta, determinarea sfârșitului fișierului este foarte importantă. Poate fi definit folosind funcția EOF (End Of File):

EOF(FileHandle)

· EOF – numele funcției;

· FileHandle este un pointer către fișierul al cărui sfârșit este determinat.

Funcția returnează True dacă se ajunge la sfârșitul fișierului, în caz contrar returnează False.

8.2. Citirea și scrierea într-un fișier text

Fișierul text este deschis în modul de acces „Intrare”, „Ieșire” sau „Adăugați” (vezi Tabelul 15). Particularitatea acestui mod este că funcționează numai cu anumite caractere imprimabile. Este inutil să lucrezi cu simboluri de serviciu.

Pentru a înregistra informații, utilizați doi operatori „Print” și „Write”, a căror sintaxă este următoarea:

Tipăriți #FileHandle%, VarBuffer [;]

Scrieți #FileHandle%, VarBuffer [;]

· Print /Write – cuvinte cheie operator.

· #FileHandle % - indicator către fișierul în care vor fi plasate informațiile.

· VarBuffer – valoarea care va fi scrisă în fișier.

· ; – un parametru opțional folosit la scrierea într-un fișier text, înseamnă că următoarea valoare va fi scrisă pe aceeași linie, iar dacă este absentă, pe următoarea.

Pentru a citi informații dintr-un fișier, utilizați operatorii „Input” și „Line Input”. Sintaxa este similară una cu cealaltă:

Linie de intrare #FileHandle%, VarBuffer

Introduceți #FileHandle%, VarBuffer

· Line Input / Input – cuvinte cheie operator.

· #FileHandle % - indicator către fișierul din care vor fi citite informații.

· VarBuffer – o variabilă în care vor fi citite informații.

Diferența dintre operatorii „Line Input” și „Input” este că primul este destinat numai fișierelor text, iar al doilea - pentru oricare. În cazul fișierelor text, „Input” citește datele pe o linie până la primul delimitator (pentru datele text separatorul este „,” (virgulă), iar pentru datele numerice - „” (spațiu) și „,”) , iar „Line Input” citește întreaga linie simultan, ignorând orice delimitatori.

Notă

Visual Basic nu are mijloace de a controla formatul fișierelor create anterior. Prin urmare, simbolul „2” poate fi citit ca număr corespunzător și invers.

8.3. Lucrul cu fișiere binare

Fișierele se deschid în format binar operator „Deschidere” în modul „Binar”. O caracteristică distinctivă a acestui mod este că lucrul cu fișierul se concentrează exclusiv pe octeți specifici. Deoarece Visual Basic poate adresa direct locația dorită într-un fișier, acest mod se mai numește și - modul de acces direct. O altă caracteristică a acestui mod este capacitatea de a scrie și citi simultan informații în diferite părți ale fișierului fără a-l redeschide. Scrierea într-un fișier deschis în modul binar se face folosind următoarea sintaxă:

Puneți #FileHandle%, , NameVar

· Put – numele operatorului de înregistrare a informațiilor.

· RecNumber – numărul de octeți al fișierului în care vor fi scrise informațiile (parametru opțional).

· NameVar este o variabilă al cărei conținut va fi scris în fișier.

Citirea informațiilor dintr-un fișier în modul binar se face folosind următorul operator:

Obțineți #FileHandle%, , NameVar

· Get – numele operatorului de înregistrare a informațiilor.

· FileHandle % - handle de fișier.

· RecNumber – numărul de octeți al fișierului din care vor fi citite informații (parametru opțional).

· NameVar – numele variabilei în care vor fi plasate informațiile citite.

Deoarece modul binar este axat pe octeți de informații, atunci când se citește dintr-un fișier, variabila buffer trebuie să aibă un tip strict definit: fie „Byte”, atunci se va citi valoarea numerică a octetului, fie un caracter de lungime fixă. de un caracter, atunci octetul va fi citit ca un caracter, ANSI , al cărui cod corespunde mărimii octetului. Acest caracter poate fi chiar un caracter de control, ceea ce nu poate fi realizat în cazul fișierelor text.

Notă

În absența parametrului „RecNumber”, scrierea sau citirea informațiilor va avea loc în următorul octet al fișierului după cel cu care a fost lucrat anterior.

8.4. Manipularea grafică

De asemenea, puteți salva și extrage imagini grafice din fișiere. Pentru a extrage o imagine dintr-un fișier bitmap sau pictogramă și a o atribui proprietății „Picture” a controalelor „PictureBox” și „Imagine”, utilizați funcția „LoadPicture()” cu următoarea sintaxă:

ImageCtrl.Picture = LoadPicture(FilePath)

· ImageCtrl – numele unui control de fereastră de imagine, control de imagine sau formular;

· LoadPicture – numele funcției;

· FilePath – numele complet al fișierului.

SavePicture ImageCtrl .Picture, FilePath

· SavePicture – numele operatorului;

· ImageCtrl – numele unui control de fereastră de imagine, control de imagine sau formular;

· Imagine – numele proprietății obiectului responsabil pentru imagine;

· FilePath – numele complet al fișierului care indică locația acestuia pe disc.

8.5. Lucrul cu datele din registru

Registrul Windows poate fi folosit pentru a stoca mici informații în format de caractere. Visual Basic are patru proceduri pe care le puteți folosi pentru a-l accesa. Sunt foarte ușor de utilizat, dar au un dezavantaj principal: puteți accesa date doar dintr-o anumită cheie de registry: „MyComputer\HKEY_CURRENT_USER\Software\VB and VBA Program Settings”. Pentru a accesa alte secțiuni ale registrului, trebuie să utilizați funcțiile speciale „Win ​​32 API”.

Pentru a obține valoarea unei setări din secțiunea Visual Basic a registrului Windows, trebuie să utilizați următoarea funcție:

MyString = GetSetting(VBKeyName, Section, Key [,Default])

· MyString – un șir pentru a stoca valoarea returnată de funcție;

· GetSetting – numele funcției.

· VBKeyName este o valoare șir care este numele subcheii interne VB/VBA.

· Cheia este o valoare șir care reprezintă numele parametrului din secțiune.

· Implicit – un argument opțional, a cărui valoare va fi returnată în cazul unei erori (parametru lipsă).

Pentru a stoca o valoare în registry Windows, utilizați următoarea instrucțiune:

SaveSetting VBKeyName, Section, Key, MyString

· SaveSetting – numele operatorului.

· MyString este o variabilă șir în care va fi plasată valoarea găsită.

Pentru a obține o matrice din registry care conține toate valorile parametrilor de la o anumită subcheie, utilizați următoarea funcție:

MyVariant = SetAllSettings(VBKeyName, Section)

· MyVariant este o matrice de valori de tip „Variant” returnate de funcție.

· SetAllSettings – numele funcției.

· Secțiune – O valoare șir care reprezintă o secțiune sau subsecțiune a unei anumite aplicații.

Pentru a elimina o întreagă secțiune de parametri, utilizați o instrucțiune cu următoarea sintaxă:

DeleteSetting VBKeyName, Section, Key

· DeleteSetting – numele operatorului.

Întrebări de testare pentru autotest

  1. Cum puteți stoca unele informații pe termen lung?
  2. Ce este un fișier?
  3. Ce nume de fișiere cunoașteți?
  4. Dați sintaxa operatorului „Deschidere”. Explicați scopul parametrilor săi.
  5. Cum pot mai multe aplicații să partajeze accesul la un fișier în același timp?
  6. Cum se stabilește că informațiile dintr-un fișier sunt epuizate?
  7. De ce este recomandat să îl închideți după ce lucrați cu un fișier?
  8. Care vedeți ca fiind diferența dintre modurile de fișier text și binar?
  9. Cum sunt citite și scrise datele în modul fișier text?
  10. Cum sunt citite și scrise datele în modul fișier binar?
  11. Care este diferența dintre operatorii „Print” și „Write” atunci când lucrați cu fișiere?
  12. Care este diferența dintre operatorii „Intrare” și „Intrare linie” atunci când lucrați cu fișiere?
  13. Cum poți lucra cu date grafice?
  14. Care sunt principiile de bază ale lucrului cu registrul Windows?



Top