Յուրաքանչյուր ծրագիր պետք է տվյալները պահի սկավառակի վրա և կարդա դրանք սկավառակից: Սա անհրաժեշտ է, օրինակ, ծրագրի կարգավորումները պահպանելու համար, քիչ հավանական է, որ օգտագործողին դուր գա ծրագիրը, որը հաջորդ անգամ սկսելուց հետո նորից պետք է կազմաձևվի:
Այս հոդվածը կենտրոնանում է Visual Basic-ի միջոցով տեքստային ֆայլերի հետ աշխատելու վրա:
Ֆայլի նկարագրիչ
Ֆայլերի հետ աշխատելու համար օպերացիոն համակարգօգտագործում է I/O ալիքներ, այսինքն. յուրաքանչյուրը բացել ֆայլըունի իր համարը.
Visual Basic-ում ֆունկցիա կա անվճար ֆայլ, որը վերադարձնում է անվճար ալիքի թիվը, որը կարող է օգտագործվել ֆայլի հետ աշխատելու համար: Եթե չկան անվճար ալիքներ, ապա սխալ է տեղի ունենում:
Ազատ Ֆայլ[(Range Number) ]
Range Number- կամընտիր պարամետր, որը թույլ է տալիս որոշել անվճար ալիքների շրջանակը, եթե Range Number= 0 (կանխադրված), ապա ալիքի համարը վերադարձվում է 1 - 255 միջակայքից, իսկ եթե 1, ապա 256 - 511 միջակայքից:
MyFile = FreeFile « MyFile փոփոխականը նշանակված է անվճար ալիքև այժմ այն կարող է օգտագործվել ֆայլերի հետ աշխատելու համար
Աշխատեք տեքստային ֆայլերի հետ
Ամենից հաճախ անհրաժեշտ է հանդիպել տեքստային ֆայլերի հետ: Տեքստային ֆայլերը բաղկացած են ASCII (Տեղեկատվության փոխանակման ամերիկյան ստանդարտ կոդ) նիշերի հավաքածուից:
Նախքան սկսեք գրել / կարդալ տվյալները, ֆայլը պետք է բացվի, դա արվում է օպերատորի միջոցով բաց (Ֆայլի անունը) Որպես #ֆայլի_համարը, որտեղ:
Մուտքագրում- բացեք ֆայլ կարդալու համար, եթե ֆայլը գոյություն չունի, ապա սխալ է տեղի ունենում.
Արդյունք- գրելու համար, եթե ֆայլը գոյություն չունի, այն կստեղծվի, իսկ եթե ֆայլը կա, այն կվերագրվի;
Հավելված- ավելացնելու համար, եթե ֆայլը գոյություն չունի, այն կստեղծվի, իսկ եթե ֆայլը կա, ապա տվյալները կավելացվեն ֆայլի վերջում:
Տեքստային ֆայլերի ընթերցումը կարող է իրականացվել երկու եղանակով՝ կարդալ նիշ առ նիշ՝ օգտագործելով ֆունկցիան Մուտք (Կարդացված_նիշերի_քանակը, #ֆայլի_համարը) և տող առ տող, դրա համար օգտագործվում է ֆունկցիան Գծի մուտքագրում #ֆայլի_համարը, Որտեղ_կարդալ.
DimMyFile
Dim S As String «Փոփոխական՝ կարդալու տվյալները պահելու համար
MyFile = FreeFile
Բացեք («C:\TEST.txt»)՝ որպես #MyFile մուտքագրելու համար
Գծի մուտքագրում #MyFile,S «Կարդացեք TEST.TXT ֆայլի առաջին տողը S փոփոխականի մեջ
DimMyFile «Հայտարարեք փոփոխական անվճար ֆայլի համար
Dim i Որպես ամբողջ թիվ «Փոփոխական օղակի համար
Dim tS As String «Փոփոխական տողերի ընթերցման համար
Dim S As String «Փոփոխական՝ վերջնական տվյալները պահելու համար
MyFile = FreeFile «Ֆայլերի հետ աշխատելու համար նշանակեք անվճար ալիք
«Բացեք TEST.TXT ֆայլը կարդալու համար
i = 1-ից 5-ի համար
Գծի մուտքագրում #MyFile, tS «Կարդացեք TEST.TXT ֆայլը տող առ տող
Եթե i => 5, ապա S = tS «Եթե հինգերորդ տողը, ապա պահեք այն S փոփոխականում
Հաջորդ i
Փակել #MyFile «Փակել ֆայլը
Dim MyFile «Հայտարարել փոփոխական անվճար ֆայլի համար
Dim S As String «Փոփոխական՝ կարդալու տվյալները պահելու համար
MyFile = FreeFile «Ֆայլերի հետ աշխատելու համար նշանակեք անվճար ալիք
Բացեք («C:\TEST.txt»)՝ որպես #MyFile մուտքագրելու համար «Բացեք TEST.TXT ֆայլը կարդալու համար
S = Մուտք $(LOG(1), 1) «Կարդացեք ամբողջ ֆայլը փոփոխական S
Փակել #MyFile «Փակել ֆայլը
Ֆայլում գրելու օպերատորներ կան: Տպել#ֆայլի_համարը, Տվյալներև Գրել #ֆայլի_համարը, Տվյալներ. Այս օպերատորների միակ տարբերությունն այն է Գրելգրում է տվյալները չակերտներով, և տպելառանց չակերտների.
Հետևյալ կոդը կստեղծի նոր ֆայլ TEST.TXT C:\ դրայվում և դրա մեջ կգրի երկու տող՝ առաջինը առանց չակերտների, իսկ երկրորդը՝ չակերտներով.
DimMyFile «Հայտարարեք փոփոխական անվճար ֆայլի համար
MyFile = FreeFile «Ֆայլերի հետ աշխատելու համար նշանակեք անվճար ալիք
Բացեք («C:\TEST.txt») որպես #MyFile ելքի համար «Գրելու համար բացեք TEST.TXT ֆայլը
Տպել #MyFile, «Այս տողը գրվել է Print հայտարարությամբ, այն առանց չակերտների է...»:
Գրեք #MyFile, «Այս տողը գրվել է Write դրույթով, այն չակերտների մեջ է...»:
Փակել #MyFile «Փակել ֆայլը
Դա իրականում բոլորն է: Ինչպես հավանաբար արդեն հասկացաք, ֆայլը փակելու համար օգտագործվող օպերատորն է Փակել#ֆայլի_համարը, որտեղ, # ֆայլի_համարըչի պահանջվում նշել.
Հոդվածը մի քիչ հում է, բայց օգտակար կլինի սկսնակ ծրագրավորողների համար։ Հաջորդ անգամ կխոսեմ երկուական ֆայլերի հետ աշխատելու մասին։
WindowsՆպատակը: Ֆայլերի հետ աշխատելու համար VB 6 լեզվի օպերատորների ուսուցում և օգտագործում տարբեր տեսակներհաջորդական (տեքստային) ֆայլեր, պատահական մուտքի ֆայլեր, երկուական ֆայլեր: Գործիքի ուսումնասիրություն և օգտագործում ԸնդհանուրԵրկխոսությունֆայլեր բացելու և պահելու, տառատեսակներ և գույներ ընտրելու և օբյեկտն օգտագործելու համար clipboardտեքստի բեկորներ պահելու համար՝ օգտագործելով պարզ տեքստային խմբագրիչ ստեղծելու օրինակը։
Թեստի հարցեր.
1. Որո՞նք են տեքստային ֆայլ բացելու ուղիները: Ինչպե՞ս փակել տեքստը և ցանկացած այլ բաց ֆայլ:
2. Ինչպե՞ս են տվյալները գրվում գրավոր տեքստային ֆայլում: Ո՞րն է տարբերությունը Գրելու և տպելու հայտարարությունների միջև:
3. Ինչպես են տվյալները ընթերցվում բացից՝ կարդալու համար տեքստային ֆայլ? Ո՞րն է տարբերությունը Input և Line Input օպերատորների միջև: Ի՞նչ ֆունկցիա կարող է օգտագործվել ֆայլից որոշակի թվով նիշ կարդալու համար: Ինչպե՞ս կարդալ ֆայլի բոլոր նիշերը:
4. Ինչ է հատուկ տվյալների տեսակը և ինչպես է օգտագործվում այս հասկացությունը պատահական մուտքի ֆայլերի հետ աշխատելիս ( raf)?
5. Ֆայլից ինչ օպերատորներով rafգրառումները կարդացվում են և մտնում ֆայլ rafգրվում են նոր ռեկորդներ.
6. Ինչ նպատակով է սահմանվում և օգտագործվում ինդեքսը ֆայլի հետ աշխատելիս raf?
7. Որո՞նք են երկուական ֆայլերի օգտագործման առանձնահատկությունները: Ինչպե՞ս են բացվում: Ինչպե՞ս է կատարվում երկուական ֆայլից կարդալը և երկուական ֆայլ գրելը:
8. Ինչպես կարող է կիրառվել վերահսկողությունը ԸնդհանուրԵրկխոսությունբեռնել տեքստային ֆայլի բովանդակությունը տեքստային դաշտում: Ինչպե՞ս օգտագործել նույն կառավարումը խմբագրված տեքստը տեքստային ֆայլում պահելու համար:
9. Ինչպես կարող եք կիրառել վերահսկողությունը ԸնդհանուրԵրկխոսությունֆայլի բովանդակությունը ներբեռնելու համար rtfդաշտում Հարուստտեքստային տուփ? Ինչպես օգտագործել նույն հսկողությունը՝ խմբագրված տեքստը ֆայլում պահելու համար rtf?
10. Ինչպես կարող եք կիրառել վերահսկողությունը ԸնդհանուրԵրկխոսությունտառատեսակի պարամետրերի արժեքները փոխելու և պատուհանում տեքստի գույնը փոխելու համար տեքստային տուփ(կամ տեքստի ընտրված հատվածը պատուհանում Հարուստտեքստային տուփ)?
Օրինակ 7.1. Դիտարկենք մի դիմում, որը ցույց է տալիս «աշխատակիցների մանրամասները» գրելը (և կարդալ տեքստային ֆայլից)՝ տողեր, որոնք պարունակում են աշխատողի նույնականացման համարը, լրիվ անունը, ծննդյան ամսաթիվը և ծննդյան վայրը: Տողերը կազմում են աղյուսակ, որը կկրկնօրինակվի էկրանի ձևի վրա 4 Combo Box կառավարիչներով (նկ. 7.1), որոնք կազմում են Comb(i) օբյեկտների զանգված, որի Style հատկությունը դրված է 1 - SimpleCombo:
DIV_ADBLOCK265">
Comb(j).ListIndex = i
«Լրացում նոր մուտքսեղանին:
Անձնական ենթաբաժին mnuAdd_Click()
XC(j) = Comb(j).Text
Comb(j).AddItem XC(j)
«Սեղանից գրառումը ջնջելը.
Անձնական ենթաբաժին mnuRemove_Click()
i% = Comb(0).ListIndex
Եթե ես< 0 Then
MsgBox «Ընտրեք ջնջվող տողը», vbExclamation
Comb(j).RemoveItem i
«Տեղադրեք նոր գրառում աղյուսակում.
Անձնական ենթաբաժին mnuInsert_Click()
i% = Comb(0).ListIndex
Եթե ես< 0 Then
MsgBox «Select a line to insert before it», vbExclamation
Comb(0).AddItem InputBox(«Մուտքագրեք համարը»), i
Comb(1).AddItem InputBox(«Մուտքագրեք անունը»), i
Comb(2).AddItem InputBox(«Մուտքագրեք ծննդյան ամսաթիվը»:), i
Comb(3).AddItem InputBox(«Մուտքագրեք ծննդյան վայրը»), i
«Աղյուսակում մուտքի փոփոխություն.
Անձնական ենթաբաժին mnuUpdate_Click()
i% = Comb(0).ListIndex
Եթե ես< 0 Then
MsgBox «Ընտրել տողը փոփոխելու համար», vbExclamation
Comb(0).List(i) = InputBox("Enter number", Comb(0).List(i))
Comb(1).List(i) = InputBox("Enter name", Comb(1).List(i))
Comb(2).List(i) = InputBox(«Մուտքագրեք ծննդյան ամսաթիվը», Comb(2):List(i))
Comb(3).List(i) = InputBox(«Մուտքագրեք ծննդյան վայրը», Comb(3):List(i))
«Ամբողջ սեղանի մաքրում.
Անձնական ենթաբաժին mnuClear_Click()
Աղյուսակը լրացնելը տեքստային ֆայլից տեղեկություններով.
Անձնական ենթաբաժին mnuLoad_Click()
Բացեք «person.txt»՝ որպես #1 մուտքագրման համար
Մուտքագրեք թիվ 1, թմրած, fio, bdate, բլոկ
Comb(0).AddItem numb
Comb(1).AddItem fio
Comb(2).AddItem bdate
Comb(3).AddItem բլոկ
Աղյուսակի մանրամասները տեքստային ֆայլում գրելը.
Անձնական ենթաբաժին mnuSave_Click()
N% = Comb(0).ListCount
Բացեք «person.txt»՝ որպես #1 արդյունք
i = 0-ից N - 1-ի համար
թմրած = Val(Comb(0).Ցուցակ(i))
fio = Սանր (1) Ցուցակ (i)
bdate = CDate(Comb(2).List(i))
բլոկ = Սանր (3). Ցուցակ (i)
Գրեք թիվ 1, թմրած, fio, bdate, բլոկ
«Հավելվածի անջատում.
Անձնական ենթաբաժին mnuExit_Click()
Օրինակ 7.2 . Դիտարկենք մի ծրագիր, որը ցույց է տալիս հսկիչ սարքերի օգտագործումը ԸնդհանուրԵրկխոսությունֆայլ բացելու և պահելու, տառատեսակ և գույն ընտրելու և տեքստը խմբագրելու համար:
Ֆայլի ձևաչափում TXTկբեռնվի տեքստային դաշտում (ձախ դաշտը Նկար 7.2-ում) և ձևաչափի ֆայլը RTF- դաշտում Հարուստտեքստային տուփ(աջ լուսանցք Նկար 7.2-ում):
DIV_ADBLOCK267">
Համակարգչային միջերեսն իրականացնելու համար լրացվում է հետևյալ հատկությունների աղյուսակը.
|
օբյեկտ | Դասարան օբյեկտ | Սեփականություն օբյեկտ | Գույքի արժեքը |
«Գլխավոր վահանակներ երկխոսություն» |
|||
Բացել/Պահել որպես ներդիր |
|||
Տառատեսակի ներդիր |
|||
Գույնի ներդիր |
Աղյուսակը ցույց չի տալիս ցանկի հրամանների հատկությունները Տառատեսակ, գույնև Խմբագրել. Ստորև ներկայացված է ընթացակարգի կոդը նաև միայն մենյուի հրամանների համար ֆայլ (բացել, Պահպանելև ՊահպանելԻնչպես) Մենյուի այլ հրամանների համար կոդ կազմելը այս աշխատանքի 2-րդ առաջադրանքի թեման է։
Անձնական ենթաբաժին mnuOpen_Click()
CommonDialog1.ShowOpen
F$ = CommonDialog1.FileName
Եթե Right(F, 3) = «rtf» Ապա
RichTextBox1.LoadFile F
ElseIf Right(F, 3) = «txt» Ապա
Բացեք F-ը որպես #1 մուտքագրման համար
S$ = Մուտք (N, 1)
Անձնական ենթաբաժին mnuSave_Click()
CommonDialog1.ShowSave
F$ = CommonDialog1.FileName
Անձնական ենթաբաժին mnuSaveAs_Click()
CommonDialog1.ShowSave
F$ = CommonDialog1.FileName
RichTextBox1.SaveFile F, rtfRTF
Այս աշխատանքի ընթացքում ուսանողը պետք է կատարի 2 առաջադրանք.
Վարժություն 1. Առաջադրանքը կատարելու գործընթացում ուսանողները տիրապետում են VB 6-ում առկա պատահական մուտքի ֆայլերի հետ աշխատելու հնարավորություններին ( RAF-պատահականմուտքֆայլ).
Տվյալ տվյալների բազայի աղյուսակի համար հայտարարվում է օգտագործողի կողմից սահմանված տվյալների տեսակը, հայտարարվում է այս տեսակի փոփոխական (ուղեցույց, էջ 108 - 112), ընթացակարգերը կազմվում և կարգաբերվում են, որոնք օգտագործում են օգտագործողի կողմից սահմանված տիպի փոփոխականը:
Մասնավորապես, իրականացվում են մենյուի հրամանների ընթացակարգեր: Գրեք ֆայլինRAFև Կարդացեք ֆայլիցRAF. Ինչպես օրինակ 7.1-ում, տվյալների խմբագրման համար օգտագործվում է օբյեկտների զանգված: Կոմբոտուփև ճաշացանկ Խմբագրելենթամենյուի հինգ հրամաններով. Ավելացնել նշում, Ջնջել մուտքը, Տեղադրեք մուտքը, Խմբագրել մուտքը, Մաքուր աղյուսակ.
Տարբերակ 1.
Հայտարարեք «Ավտոծառայություն» տվյալների բազայի «Ավտոմեքենա» աղյուսակի (Աղյուսակ 7.1) հատուկ տվյալների տեսակը:
|
մեքենա |
մեքենա |
անսարքություններ |
Աղյուսակ 7.1-ի ներքևի տողը ցույց է տալիս դաշտերի տեսակները:
Տարբերակ 2.
Հայտարարել անհատական տվյալների տեսակը Ավտոմեքենաների սպասարկման տվյալների բազայի Սխալների աղյուսակի համար (Աղյուսակ 7.2):
|
անսարքություններ | Անուն անսարքություններ | Գին |
Աղյուսակ 7.2-ի ներքևի տողը ցույց է տալիս դաշտերի տեսակները:
Օգտագործելով 7.1 հավելվածի օրինակը որպես նմուշ, կազմակերպեք տվյալների մուտքագրում և խմբագրում ներկայացված աղյուսակի համար, գրելով այս տվյալները պատահական մուտքի ֆայլում և կարդալով տվյալները պատահական մուտքի ֆայլից: Ինչպես օրինակ 7.1-ում, այս գործողություններն իրականացվում են որպես ցանկի հրամանների աշխատանք, որը ներկայացված է Նկ. 7.1.
Առաջադրանք 2. Որպես գործունեության մի մաս, ուսանողները ավելացնում են նոր առանձնահատկություններ օրինակ հավելված 2-ում, որոնք թույլ են տալիս հավելվածին վերաբերվել որպես պարզ տեքստային խմբագրիչի:
Տարբերակ 1 ԸնդհանուրԵրկխոսությունիրականացնել ընտրացանկի հրամանները Տառատեսակև գույն(ենթամենյուով Նիշերի գույնըև Ֆոնի գույնը) Այս հրամանների օգնությամբ պետք է ապահովվի պատուհանում ընտրված տեքստի հատվածի տառատեսակի ընտրությունը (նրա անունը, ոճը և չափը): Հարուստտեքստային տուփ, ինչպես նաև ընտրել ընտրված հատվածի նշանների գույնը և ընտրել այս ամբողջ պատուհանի ֆոնի գույնը:
Նշում:Երբ ստեղծվում է օբյեկտ ԸնդհանուրԵրկխոսություն(Պատվիրված) հատկությամբ տառատեսակ ընտրելու համար, համոզվեք, որ դրոշակներ հատկության արժեքը սահմանել եք 1, 2 կամ 3 (տե՛ս ձեռնարկը, էջ 183):
Տարբերակ 2. Օգտագործելով հսկողությունը ԸնդհանուրԵրկխոսությունիրականացնել ընտրացանկի հրամանները Խմբագրել(ենթամենյու Պատճենել, Կտրելև մածուկ), որի նպատակն է պատճենահանումկամ հեռացումընտրված տեքստի հատվածի սեղմատախտակին, ինչպես նաև ներդիրդեպի սեղմատախտակի բովանդակության տեքստի ընտրված տեղը:
Նշում:Դեպի clipboard (օբյեկտ clipboard) կարող եք օգտագործել SetText և GetText մեթոդները.
clipboard. SetText RichTextBox1.SelText
RichTextBox1.SelText = Clipboard: ստանալ տեքստ
Նիշերի տիպի տվյալներ
Համակարգչի հիշողության յուրաքանչյուր նիշի համար 1 բայթ (8 բիթ) հիշողություն հատկացվում է ASCII կոդավորման մեջ (կամ երկու բայթ Յունիկոդում): Կոդերի աղյուսակները պարունակում են 256 նիշ: Առաջին համարի կոդերը 0 վրա 127 ցանկացած կոդավորման մեջ նույնն են: Համարից 0 վրա 31 - կառավարման նիշեր, համարներ 32 - տարածություն. Հետագա խորհրդանիշներ 48 վրա 57 - 0-ից 9 թվեր , Հետ 65 վրա 90 - մեծատառեր Լատինական այբուբեն, Հետ 97 վրա 122 - լատինական այբուբենի փոքր տառեր: Միջանկյալ նշաններն են. Սեղանի դիրքերը հետ 128 վրա 256 օգտագործվում է տարբեր լեզուների ազգային նշանների համար:
Նիշերի տվյալները կարելի է համեմատել միմյանց հետ՝ օգտագործելով նույն համեմատական գործողությունները, ինչ թվաբանական տիպի տվյալների հետ: Համեմատությունը կատարվում է նիշ առ նիշ (բայթ առ բայթ) ձախից աջ: Փաստորեն, համապատասխան նիշերի կոդերը համեմատվում են:
Նիշերի տվյալները մշակելու համար կարող եք օգտագործել օպերանդների միացման գործողությունը (գործողության նշանը «+» կամ & նշանն է):
Նիշերի տողը միշտ կարող է վերածվել առանձին նիշերի միաչափ զանգվածի` այն բաժանելով ֆունկցիայի միջոցով: ՄԻԴկամ Պառակտում. Զանգվածը մշակելուց հետո նրա տարրերը պետք է նորից միաձուլվեն տողի մեջ՝ օգտագործելով կապակցման գործողության & (Concatenation):
Առաջադրանքների ճնշող մեծամասնությունը լուծելը պահանջում է ներկառուցված VB6 գործառույթների իմացություն
|
Գործառույթ |
Գործողություններ կատարել |
Օրինակ |
|
Որոշում է նշված նիշերի փոփոխականի երկարությունը բայթերով (նիշերի քանակը) |
Ֆիո=Իվանով |
|
|
Կտրում է փոփոխականից Xձախ կկերպարներ. Կտրված նիշերը կարող են վերագրվել մեկ այլ փոփոխականի |
Ֆիո=Իվանով T = Իվան |
|
|
Նախորդ ֆունկցիայի նման, միայն աջ կողմում |
Ֆիո=Իվանով |
|
|
Կտրում է կնիշեր փոփոխականից x, սկսած դիրքից դիրք, ներառյալ |
Ֆիո=Իվանով Տ=վանո |
|
|
Xտասնորդական թվին: | ||
|
Փոխակերպում է նշված նիշերի փոփոխականը Xամբողջ թվի մեջ | ||
|
Փոխակերպում է թիվը yկերպարների տողի մեջ: Ստորագրման ենթակա. Եթե թիվը դրական է, նշանը փոխարինվում է բացատով: |
s=”-678 123,45” |
|
|
Արդյունքը խորհրդանիշի աղյուսակում նշված թվին համապատասխանող նշանն է |
Լատինական այբուբենի մեծատառերի թողարկում |
|
|
Նշում է տողի առաջին նիշի թվային կոդը X |
Տպել ASC («123») Տպել ASC («1a2m») Տպել ASC («ABC») Էկրանի վրա 49 32 65 |
|
|
Սկսած դիրքից n, սահմանում է ենթալարի առաջին հայտնվելու դիրքը yհերթի մեջ x. Եթե չի գտնվել, ապա արդյունքը 0 է: |
x = "եգիպտացորեն" Տպել INSTR(1,x,y); Տպել INSTR(2,x,y); Էկրանի վրա 1 3 |
|
|
Վերադարձնում է x տողի պատճենը տողի ձախ մասից բացատ նիշերը հեռացնելուց հետո (առաջատար բացատներ) | ||
|
Վերադարձնում է x տողի պատճենը տողի աջ մասից բացատ նիշերը հեռացնելուց հետո (հետևի բացատներ) | ||
|
Վերադարձնում է x տողի պատճենը առաջատար և հետին բացատները հեռացնելուց հետո | ||
|
Վերադարձնում է x տողի պատճենը՝ բոլոր մեծատառերը վերածված փոքրատառերի | ||
|
Վերադարձնում է x տողի պատճենը՝ բոլոր փոքրատառերը վերածված մեծատառերի | ||
|
Փոխում է նիշերի տողի տառային մեծությունը՝ կախված P պարամետրի արժեքից P=1, մեծատառ P=2, փոքրատառ P=3, միայն առաջին կապիտալը | ||
|
Փոխում է տողի հերթականությունը | ||
|
Վերադարձնում է n նիշ երկարությամբ բացատների շարան | ||
|
REPLASE(S, S1, S2, n, k) |
S տողի S1 ենթատողը փոխարինում է S2 ենթատողով, սկսած n դիրքից, k-ն փոխարինումների թիվն է, եթե նշված չէ, ապա S1-ի բոլոր երևույթները փոխարինվում են: |
տպել Փոխարինել(s1,”1”,””,1) Էկրանին 23 |
Պառակտման գործառույթ
Նոր գործառույթ, որը ներդրվել է Visual Basic 6.0-ում: Split ֆունկցիան օգտագործվում է տողը ենթատողերի բաժանելու համար՝ օգտագործելով ենթալարի բաժանարար: Վերադարձնում է Variant(String) տվյալների տիպի միաչափ զանգված, որը պարունակում է գտնված ենթատողերը որպես տարրեր:
Պառակտում (արտահայտություն,,,)
արտահայտություն - Պահանջվող արգումենտն այն տողն է, որը պետք է բաժանվի: Եթե արգումենտը պարունակում է զրոյական տող (""), ապա դատարկ զանգված է վերադարձվում, այսինքն. զանգված առանց տարրերի և տվյալների։
Սահմանազատող- Ընտրովի արգումենտ - տիպի նշաններ Լարային, որոնք օգտագործվում են որպես գծերի բաժանարար։ Եթե արգումենտը բաց է թողնված, ապա լռելյայնը բացատ նիշն է (" "): Եթե արգումենտը պարունակում է զրոյական տող (""), ապա վերադարձվում է մեկ տարրից բաղկացած զանգված, որը պարունակում է ամբողջ տողը:
սահման - Ընտրովի արգումենտ, որը պարունակում է վերադարձվող ենթատողերի քանակը: Եթե արգումենտը բաց է թողնված կամ հավասար է -1-ի, ապա ամբողջ տողը մշակվում է:
Համեմատեք - Ընտրովի արգումենտը թվային հաստատուն է, որը սահմանում է համեմատության տեսակը:
Գործառույթ Միանալ
Գործառույթը, որը կատարում է հակադարձ գործողություն– զանգվածի տարրերի միացումը տողի մեջ՝ օգտագործելով նշված սահմանազատիչը:
Միանալ (անուն_զանգված, )
Օրինակ . Տրված տեքստ. Որոշեք առաջարկների քանակը: Գտեք «p» տառով սկսվող բառերի քանակը: Ձևի վրա «Text1» դաշտում գտնվում է սկզբնաղբյուր տեքստը, «Text2» դաշտում՝ նախադասությունների քանակը, «Text3» դաշտում՝ «Text1» տառով սկսվող բառերի քանակը: նամակ p.
Մասնավոր ենթահրաման1_Click()
s1$ = «Բարև Պողոս: Շնորհավոր տոներ: Լավագույն մաղթանքներ Պետրոս»:
a$ = Միջին (s1, i, 1)
Եթե (a = ".") Կամ (a = "?") Կամ (a = "!") Ապա kp = kp + 1
i = 1-ի համար To ns - 2
Եթե Mid(s1, i, 1) = «P» Կամ Mid(s1, i, 1) = «p» Ապա ks = ks + 1
Եթե Mid(s1, i, 2) = «P» Կամ Mid(s1, i, 2) = «p» Ապա ks = ks + 1
Text2.Text = Str(kp)
Text3.Text = Str(ks)
Մասնավոր ենթահրաման 2_Click()
Օպերատորմիջն
Շարահյուսություն
Միջին (stringvar, սկիզբ [, երկարություն]) = տող,
որտեղ stringvar-ը փոփոխվող տողային փոփոխականի անունն է,
սկսել- նիշի դիրքը stringvar-ում, որտեղից սկսվում է տողի փոխարինված մասը,
երկարությունը- փոխարինվող նիշերի քանակը,
լար- լարային արտահայտություն փոխարինելու համար:
Mid(s1, 9) = «Gilles»
Փոխարինվող նիշերի թիվը միշտ փոքր է կամ հավասար է stringvar-ի նիշերի թվին:
Այս օպերատորը չպետք է շփոթել նույնանուն գործառույթի հետ:
Ֆայլեր
Կախված կազմակերպչականից կառույցներըտեղեկատվությունը ֆայլում պահպանման եղանակըև մուտքԱյս տեղեկատվությունը սովորաբար բաժանվում է երեք տեսակի ֆայլերի.
Հաջորդական Ֆայլեր . Որպես կանոն, դրանք տեքստային ֆայլեր են: Նման ֆայլերի կառուցվածքային միավորը տող է: Դրանցում առկա տվյալները պահվում են որպես ASCII կոդերի շարան և կարող են մշակվել ցանկացած տեքստային խմբագրիչի կողմից: Նման ֆայլերի հետ աշխատելիս տվյալների գրելը և ընթերցումը կատարվում է խիստ հաջորդականորեն (դուք չեք կարող մուտք գործել երկրորդ գրառում առանց առաջինը կարդալու):
Պատահական մուտքի ֆայլեր . Սրանք կառուցվածքային ֆայլեր են, որոնք պարունակում են տեղեկատվություն գրառումների տեսքով: Օրինակ՝ տվյալների բազայի ֆայլերը։ Նման ֆայլերի գրառումների բաղադրիչները (դաշտերը) կարող են ունենալ տարբեր տեսակներ. Բայց բոլոր հաջորդական մուտքի ֆայլի գրառումներն ունեն մշտական երկարություն և հաջորդականության համար: Սա թույլ է տալիս անմիջապես մուտք գործել ցանկալի գրառում՝ առանց հաջորդաբար դիտելու բոլոր նախորդները:
Երկուական (երկուական) ֆայլեր . Սրանք կարող են լինել հաջորդական մուտքի ֆայլեր, սակայն դրանցում առկա տեղեկատվությունը ներկայացված է բայթերի կամ բայթերի բլոկների տեսքով: Նման ֆայլերը ներառում են ֆայլեր .exe ընդլայնմամբ, այսինքն. ծրագրային ապահովում։ Սրանք կարող են լինել պատահական մուտքի ֆայլեր. դրանց ռեկորդային չափը միշտ 1 բայթ է, և ցանկացած բայթ կարելի է կարդալ իր սերիական համարով:
