„ArrayList“ objektas yra panašus į kolekcijos objektą, tačiau turi daug daugiau metodų ir savybių, todėl programavimo požiūriu yra daug lankstesnis.
Kolekcijos objektas turi tik du metodus (pridėti, pašalinti) ir dvi ypatybes (skaičius, elementas), tuo tarpu masyvo sąraše yra daug daugiau. Be to, kolekcijos objektas yra tik skaitomas. Pridėjus reikšmes, indeksuotos vertės pakeisti negalima, o masyvo sąraše galima redaguoti.
Daugelis masyvo sąrašo metodų naudoja parametrus. Skirtingai nuo daugelio standartinių VBA metodų, nė vienas iš šių parametrų nėra neprivalomas. Be to, kai kurie metodai ir ypatybės ne visada rašomi didžiosiomis raidėmis, kai jie įvedami taip pat, kaip ir „Excel VBA“. Tačiau jie vis dar veikia.
„ArrayList“ objektas plečiasi ir sutampa, atsižvelgiant į tai, kiek elementų jame yra. Prieš naudojimą jo nereikia išmatuoti kaip masyvo.
Masyvo sąrašas yra vieno matmens (toks pat kaip kolekcijos objektas), o numatytasis duomenų tipas yra variantas, o tai reiškia, kad jis priims bet kokio tipo duomenis, nesvarbu, ar jie būtų skaitiniai, ar teksto, ar datos.
Masyvo sąrašas daugeliu atžvilgių pašalina daugybę kolekcijos objekto trūkumų. Žinoma, ji yra daug lankstesnė, ką gali padaryti.
Masyvo sąrašo objektas nėra standartinės VBA bibliotekos dalis. Galite naudoti jį savo „Excel“ VBA kode naudodami vėlyvą arba ankstyvą įrišimą
| 1234 | Sub LateBindingExample ()„Dim MyList“ kaip objektasNustatykite „MyList = CreateObject“ („System.Collections.ArrayList“)Pabaiga Sub |
| 123 | Sub EarlyBindingExample ()„Dim MyList“ kaip naujas „ArrayList“Pabaiga Sub |
Norėdami naudoti ankstyvojo įrišimo pavyzdį, pirmiausia turite VBA įvesti nuorodą į failą „mscorlib.tlb“
Tai galite padaryti pasirinkę „Įrankiai | Nuorodos iš „Visual Basic Editor“ (VBE) lango. Pasirodys iššokantis langas su visomis turimomis nuorodomis. Slinkite žemyn iki „mscorlib.dll“ ir pažymėkite šalia jo esantį langelį. Spustelėkite Gerai ir ta biblioteka dabar yra jūsų projekto dalis:
Vienas iš didelių „Array List“ objekto trūkumų yra tai, kad jame nėra „Intellisense“. Paprastai, kai naudojate VBA objektą, pvz., Diapazoną, pamatysite iššokantį visų galimų savybių ir metodų sąrašą. Jūs to negaunate su masyvo sąrašo objektu ir kartais jį reikia kruopščiai patikrinti, kad įsitikintumėte, jog metodą ar ypatybę parašėte teisingai.
Be to, jei VBE lange paspausite F2 ir ieškosite „masylist“, nieko nebus rodoma, o tai kūrėjui nėra labai naudinga.
Jūsų kodas bus paleistas žymiai greičiau su ankstyvu susiejimu, nes jis yra sudarytas iš anksto. Vėlai susiejant, objektas turi būti sukompiliuotas vykdant kodą
„Excel“ programos, kurioje yra masyvo sąrašas, platinimas
Kaip jau minėta, „ArrayList“ objektas nėra „Excel VBA“ dalis. Tai reiškia, kad visi jūsų kolegos, kuriems platinate programą, turi turėti prieigą prie failo „mscorlib.tlb“
Šis failas paprastai yra:
C: \ Windows \ Microsoft.NET \ Framework \ v4.0.30319
Gali būti verta parašyti tam tikrą kodą (naudojant „Dir“ metodą), kad patikrintumėte, ar šis failas egzistuoja, kai naudotojas įkelia programą, kad, jei nerastų, patektų „minkštas nusileidimas“. Jei jo nėra ir kodas veikia, įvyks klaidų.
Be to, vartotojui turi būti įdiegta teisinga .Net Framework versija. Net jei vartotojas turi vėlesnę versiją, V3.5 turi būti įdiegta, kitaip jūsų programa neveiks
Masyvo sąrašo objekto apimtis
Kalbant apie taikymo sritį, masyvo sąrašo objektas pasiekiamas tik kol darbo knyga yra atidaryta. Išsaugojus darbo knygą jis neišsaugomas. Jei darbaknygė atidaroma iš naujo, masyvo sąrašo objektą reikia iš naujo sukurti naudojant VBA kodą.
Jei norite, kad jūsų masyvo sąrašas būtų prieinamas visiems jūsų kodo modulio kodams, tuomet turite deklaruoti masyvo sąrašo objektą pačiame modulio lango viršuje esančioje skiltyje Deklaruoti
Tai užtikrins, kad visas jūsų modulio kodas gali pasiekti masyvo sąrašą. Jei norite, kad bet kuris jūsų darbaknygės modulis pasiektų masyvo sąrašo objektą, apibrėžkite jį kaip visuotinį objektą
| 1 | „Global MyCollection“ kaip naujas „ArrayList“ |
Užpildymas ir skaitymas iš jūsų masyvo sąrašo
Paprasčiausias veiksmas, kurį norite atlikti, yra sukurti masyvų sąrašą, įdėti į jį tam tikrus duomenis ir įrodyti, kad duomenis galima skaityti. Visuose šio straipsnio kodų pavyzdžiuose daroma prielaida, kad naudojate ankstyvą įrišimą, ir pridėjote „mscorlib.tlb“ prie VBA nuorodų, kaip aprašyta aukščiau
| 123456789101112 | SubmasyvasListExample ()„Sukurkite naują masyvo sąrašo objektą„Dim MyList“ kaip naujas „ArrayList“„Įtraukite elementus į sąrašąMyList.Add "Item1"MyList.Add "Item2"MyList.Add "Item3"„Norėdami įrodyti vertes, kartokite masyvų sąrašąJei N = 0 į „MyList.Count“ - 1„MsgBox“ mano sąrašas (N)Kitas N.Pabaiga Sub |
Šis pavyzdys sukuria naują „ArrayList“ objektą, užpildo jį 3 elementais ir kartoja sąrašą, kuriame rodomas kiekvienas elementas.
Atminkite, kad „ArrayList“ indeksas prasideda nuo 0, o ne nuo 1, todėl iš skaičiaus vertės turite atimti 1
Taip pat galite naudoti kilpą „Už … kiekvienam“, kad perskaitytumėte reikšmes:
| 123456789101112 | SubmasyvasListExample ()„Sukurkite naują masyvo sąrašo objektą„Dim MyList“ kaip naujas „ArrayList“„Įtraukite elementus į sąrašąMyList.Add "Item1"MyList.Add "Item2"MyList.Add "Item3"„Norėdami įrodyti vertes, kartokite masyvų sąrašąKiekvienam I MyList„MsgBox I“Toliau ašPabaiga Sub |
Masyvo sąrašo elementų redagavimas ir keitimas
Pagrindinis masyvo sąrašo pranašumas prieš kolekciją yra tas, kad sąrašo elementus galima redaguoti ir keisti pagal jūsų kodą. Kolekcijos objektas yra tik skaitomas, o masyvo sąrašo objektas - skaitymas / rašymas
| 123456789101112131415 | SubmasyvasListExample ()„Sukurkite naują masyvo sąrašo objektą„Dim MyList“ kaip naujas „ArrayList“„Įtraukite elementus į sąrašąMyList.Add "Item1"MyList.Add "Item2"MyList.Add "Item3"„Pakeisti 1 elementą iš„ 2 elementas “į„ Pakeistas “MyList (1) = "Pakeistas"„Pakartokite masyvų sąrašą, kad įrodytumėte, jog pakeitimas pavykoKiekvienam I MyList„Rodyti elemento pavadinimą„MsgBox I“Toliau ašPabaiga Sub |
Šiame pavyzdyje antrasis elementas „2 elementas“ pakeičiamas į reikšmę „Pakeistas“ (atminkite, kad indeksas prasideda nuo 0). Kai iteracija bus vykdoma kodo pabaigoje, bus rodoma nauja vertė
Vertybių masyvo įtraukimas į masyvų sąrašą
Galite įvesti reikšmes į savo masyvo sąrašą naudodami masyvą, kuriame yra šių verčių sąrašas arba nuorodos į langelio reikšmes darbalapyje
| 123456789101112131415161718 | Sub AddArrayExample ()„Sukurkite masyvo sąrašo objektą„Dim MyList“ kaip naujas „ArrayList“„Pakartokite masyvo vertes, įtraukdami jas į masyvų sąrašąUž kiekvieną v masyvą („A1“, „A2“, „A3“)„Pridėkite prie sąrašo kiekvieną masyvo vertęMyList.Add vKitas„Pakartokite masyvo reikšmes, įtraukdami darbalapio nuorodas į masyvo sąrašąUž kiekvieną „v In Array“ (diapazonas („A5“). Vertė, diapazonas („A6“). Vertė)MyList.Add vKitas„Norėdami įrodyti vertes, kartokite masyvų sąrašąJei N = 0 į „MyList.Count“ - 1„Rodyti sąrašo elementą„MsgBox“ mano sąrašas. Elementas (N)Kitas N.Pabaiga Sub |
Įvairių elementų skaitymas / gavimas iš masyvo sąrašo
Naudodami „GetRange“ metodą masyvo sąraše, galite nurodyti iš eilės gaunamų elementų pasiutimą. Reikalingi du parametrai: pradinė indekso padėtis ir atsiimamų elementų skaičius. Kodas užpildo antrąjį masyvo sąrašo objektą su elementų pogrupiu, kurį vėliau galima skaityti atskirai.
| 123456789101112131415161718 | Sub ReadRangeExample ()„Apibrėžkite objektus„Dim MyList“ kaip naujas „ArrayList“, „MyList1“ kaip objektas„Pridėti elementus prie„ MyList “objektoMyList.Add "Item1"MyList.Add "Item2"MyList.Add "Item3"MyList.Add "Item6"MyList.Add "Item4"MyList.Add "Item7"„Užfiksuokite 4 elementus„ MyList “, pradedant nuo 2 rodyklės pozicijosNustatykite MyList1 = MyList.GetRange (2, 4)„Pakartokite objektą„ MyList1 “, kad būtų parodytas elementų antrinis rinkinysKiekvienam I MyList1„Rodyti elemento pavadinimą„MsgBox I“Toliau ašPabaiga Sub |
Elementų paieška masyvo sąraše
Galite patikrinti, ar pavadintas elementas yra jūsų sąraše, naudodami metodą „Yra“. Tai grąžins „True“ arba „False“
| 1 | „MsgBox MyList.Contains“ („2 elementas“) |
Faktinę indekso poziciją taip pat galite rasti naudodami „IndexOf“ metodą. Turite nurodyti paieškos pradžios indeksą (paprastai 0). Grąžinimo vertė yra pirmojo rasto elemento egzemplioriaus indeksas. Tada galite naudoti kilpą, kad pakeistumėte pradinį tašką į kitą indekso reikšmę ir surastumėte tolesnius atvejus, jei yra keletas pasikartojančių verčių.
Jei vertė nerasta, grąžinama -1 reikšmė
Šiame pavyzdyje parodyta, kaip naudoti elementą „Yra“, elementas nerastas ir kilnojamas per masyvų sąrašą, kad būtų galima rasti visų pasikartojančių elementų padėtį:
| 1234567891011121314151617181920212223242526 | Paieškos sąrašo pavyzdys ()„Apibrėžkite masyvų sąrašą ir kintamuosiusDim MyList As New ArrayList, Sp As Integer, Pos As Integer„Pridėkite naujų elementų, įskaitant jų kopijasMyList.Add "Item1"MyList.Add "Item2"MyList.Add "Item3"MyList.Add "Item1"„Patikrinkite, ar sąraše yra„ 2 elementas “ - grąžina„ True “„MsgBox MyList.Contains“ („2 elementas“)„Gaukite neegzistuojančios vertės indeksą -grąžina -1„MsgBox MyList.IndexOf“ („Prekė“, 0)„Nustatykite paieškos pradžios padėtį į nulįSp = 0„Pakartokite sąrašą, kad gautumėte visas„ 1 elemento “pozicijasDaryk„Gaukite kito„ 1 elemento “indekso poziciją pagal kintamojo„ Sp “pozicijąPoz = MyList.IndexOf („Item1“, Sp)„Jei nerandama daugiau„ 1 elemento “atvejų, išeikite iš cikloJei Pos = -1, tada Išeikite„Parodykite kitą rastą egzempliorių ir rodyklės poziciją„MsgBox MyList“ (poz.) & „At index“ ir poz„Pridėkite 1 prie paskutinės rastos indekso vertės - dabar tai tampa nauja kitos paieškos pradžios vietaSp = Pos + 1KilpaPabaiga Sub |
Atminkite, kad naudojamas paieškos tekstas yra didžiosios ir mažosios raidės ir nepriimami pakaitos simboliai.
Elementų įdėjimas ir pašalinimas
Jei nenorite įtraukti savo elementų į sąrašo pabaigą, galite juos įterpti į tam tikrą rodyklės vietą, kad naujas elementas būtų sąrašo viduryje. Indekso numeriai bus automatiškai pakoreguoti tolesniems elementams.
| 123456789101112131415 | Papildomas įterpimasPavyzdys ()„Apibrėžkite masyvo sąrašo objektą„Dim MyList“ kaip naujas „ArrayList“„Pridėkite elementus prie masyvo sąrašoMyList.Add "Item1"MyList.Add "Item2"MyList.Add "Item3"MyList.Add "Item1"„Įterpkite„ 6 elementą “2 rodyklės vietojeMyList.Insert 2, "Item6"„Pakartokite masyvo sąrašo elementus, kad būtų rodoma nauja tvarka ir indekso padėtisJei N = 0 į „MyList.Count“ - 1„MsgBox MyList“ (N) ir „Index“ & NKitas N.Pabaiga Sub |
Šiame pavyzdyje „6 elementas“ pridedamas prie sąrašo 2 indekso pozicijoje, todėl „item3“, kuris buvo 2 indekso pozicijoje, dabar pereina į 3 indekso poziciją
Atskirą elementą galima pašalinti naudojant „Pašalinti“ metodą.
| 1 | „MyList“. Pašalinti „elementą“ |
Atminkite, kad klaida nepateikiama, jei elemento pavadinimas nerandamas. Visi vėlesni rodyklės numeriai bus pakeisti, kad atitiktų pašalinimą.
Jei žinote elemento rodyklės poziciją, galite naudoti „RemoveAt“ metodą, pvz.
| 1 | MyList.RemoveAt 2 |
Atminkite, kad jei nurodyta indekso pozicija yra didesnė už masyvų sąrašo elementų skaičių, klaida bus grąžinta.
Galite pašalinti reikšmių diapazoną iš sąrašo naudodami „RemoveRange“ metodą. Parametrai yra pradinis indeksas, o tada elementų, kuriuos reikia pašalinti, skaičius, pvz.
| 1 | MyList.RemoveRange 3, 2 |
Atminkite, kad kodo klaidą gausite, jei elementų skaičius, pasislinkęs nuo pradžios vertės, yra didesnis nei elementų skaičius masyvo sąraše.
Taikant ir „RemoveAt“, ir „RemoveRange“ metodus, norint patekti į galimas klaidas, patartina patikrinti, ar nurodyti indekso skaičiai yra didesni už bendrą elementų skaičių masyvo sąraše. Ypatybė „Skaičiuoti“ parodys bendrą elementų skaičių masyvo sąraše.
| 12345678910111213141516171819202122232425 | Sub RemoveExample ()„Apibrėžkite masyvo sąrašo objektą„Dim MyList“ kaip naujas „ArrayList“„Pridėkite elementus prie masyvo sąrašoMyList.Add "Item1"MyList.Add "Item2"MyList.Add "Item3"MyList.Add "Item1"MyList.Add "Item4"MyList.Add "Item5"„Įterpkite„ 6 elementą “2 rodyklės vietojeMyList.Insert 2, "Item6"„Pašalinti elementą 2“„MyList“. Pašalinti „Item2“„Pašalinti elementą“ - to nėra masyvo sąraše, bet nėra klaidų„MyList“. Pašalinti „elementą“„Pašalinkite elementą 2 indekso pozicijojeMyList.RemoveAt 2„Pašalinkite 2 elementus iš eilės, pradedant nuo 2 indekso pozicijosMyList.RemoveRange 3, 2„Pakartokite masyvų sąrašą, kad parodytumėte, kas liko ir kokioje indekso pozicijoje jis dabar yraJei N = 0 į „MyList.Count“ - 1„MsgBox MyList“ (N) ir „Index“ & NKitas N.Pabaiga Sub |
Atminkite, kad jei naudojate „RemoveAt“, kad pašalintumėte elementą iš tam tikros pozicijos, tada, kai tas elementas bus pašalintas, visos tolesnės indekso pozicijos bus pakeistos. Jei turite kelis pašalinimus naudodami indekso poziciją, geriausia pradėti nuo didžiausio indekso skaičiaus ir grįžti žemyn į nulinę poziciją, kad visada pašalintumėte teisingą elementą. Tokiu būdu neturėsite problemos
Masyvo sąrašo rūšiavimas
Kitas didelis pranašumas prieš kolekciją yra tas, kad galite rūšiuoti elementus didėjančia arba mažėjančia tvarka.
Masyvo sąrašo objektas yra vienintelis „Excel VBA“ objektas, turintis rūšiavimo metodą. Rūšiavimo metodas yra labai greitas ir tai gali būti svarbus aspektas naudojant masyvo sąrašą.
Surinkimo objekte reikėjo tam tikro „iš dėžutės“ mąstymo, kad būtų galima surūšiuoti visus elementus, tačiau naudojant masyvų sąrašą tai labai paprasta.
„Rūšiavimo“ metodas rūšiuojamas didėjančia tvarka, o „Atvirkštinis“ - mažėjančia tvarka.
| 12345678910111213141516171819202122 | SubmasyvasListExample ()„Sukurkite masyvo sąrašo objektą„Dim MyList“ kaip naujas „ArrayList“„Pridėkite elementus nerūšiuota tvarkaMyList.Add "Item1"MyList.Add "Item3"MyList.Add "Item2"„Rūšiuokite elementus didėjančia tvarkaMyList. Rūšiuoti„Pakartokite elementus, kad būtų rodoma didėjimo tvarkaKiekvienam I MyList„Rodyti elemento pavadinimą„MsgBox I“Toliau aš„Rūšiuokite elementus mažėjančia tvarkaMyList. Atvirkščiai„Pakartokite elementus, kad būtų rodoma mažėjanti tvarkaKiekvienam I MyList„Rodyti elemento pavadinimą„MsgBox I“Toliau ašPabaiga Sub |
Masyvo sąrašo klonavimas
Masyvų sąrašas turi galimybę sukurti savo kloną ar kopiją. Tai naudinga, jei vartotojas atlieka elementų pakeitimus naudodamas sąsają ir jūsų VBA kodą, tačiau jums reikia išsaugoti elementų kopijas pradinėje būsenoje kaip atsarginę kopiją.
Tai gali suteikti vartotojui funkciją „Anuliuoti“. Galbūt jie padarė pakeitimus ir nori grįžti prie pradinio sąrašo.
| 123456789101112131415 | Antrinis klonasPavyzdys ()„Apibrėžkite du objektus - masyvų sąrašą ir objektąDim MyList As New ArrayList, MyList1 As Object„Užpildykite pirmąjį objektą daiktaisMyList.Add "Item1"MyList.Add "Item2"MyList.Add "Item3"„Kopijuoti„ Mylist “į„ MyList1 “Nustatykite MyList1 = MyList.Clone„Pakartokite„ MyList1 “, kad įrodytumėte klonavimąKiekvienam I MyList1„Rodyti elemento pavadinimą„MsgBox I“Toliau ašPabaiga Sub |
„MyList1“ dabar yra visi „MyList“ elementai ta pačia tvarka
Sąrašo masyvo kopijavimas į įprastą VBA masyvo objektą
Norėdami nukopijuoti masyvų sąrašą į įprastą VBA masyvą, galite naudoti paprastą metodą:
| 123456789101112131415 | Antrinis masyvasPavyzdys ()„Sukurkite masyvo sąrašo objektą ir standartinį masyvo objektąDim MyList As New ArrayList, NewArray As Variant„Užpildykite masyvų sąrašą elementaisMyList.Add "Item1"MyList.Add "Item2"MyList.Add "Item3"„Nukopijuokite masyvų sąrašą į naują masyvąNewArray = MyList.ToArray„Pakartokite naują masyvą - atkreipkite dėmesį, kad masyvų sąrašų skaičius suteikia maksimalų indeksąJei N = 0 į „MyList.Count“ - 1„Rodyti elemento pavadinimą„MsgBox NewArray“ (N)Kitas N.Pabaiga Sub |
Sąrašo masyvo kopijavimas į darbalapio diapazoną
Masyvų sąrašą galite nukopijuoti į konkretų darbalapį ir langelio nuorodą, nereikia kartoti masyvo sąrašo. Jums reikia nurodyti tik pirmą langelio nuorodą
| 123456789101112131415 | Antrasis diapazonasPavyzdys ()„Sukurkite naują masyvo sąrašo objektą„Dim MyList“ kaip naujas „ArrayList“„Įtraukite elementus į sąrašąMyList.Add "Item1"MyList.Add "Item2"MyList.Add "Item3"„Išvalykite tikslinį lapąSkaičiuoklės („Sheet1“). „UsedRange.Clear“„Kopijuoti elementus iš eilėsSkaičiuoklės („Sheet1“). Diapazonas („A1“). Keisti dydį (1, MyList.Count) .Value = MyList.toArray„Nukopijuokite elementus į stulpelįSkaičiuoklės („Sheet1“). Diapazonas („A5“). Keisti dydį („MyList.Count“, 1). Vertė = _WorksheetFunction.Transpose („MyList.toArray“)Pabaiga Sub |
Ištuštinkite visus elementus iš masyvo sąrašo
Norint visiškai išvalyti masyvų sąrašą, yra paprasta funkcija (Išvalyti)
| 1234567891011121314 | Sub ClearListExample ()„Sukurkite masyvo sąrašo objektą„Dim MyList“ kaip naujas „ArrayList“„Pridėkite naujų elementųMyList.Add "Item1"MyList.Add "Item2"MyList.Add "Item3"„Rodyti elementų skaičių„MsgBox MyList.Count“„Išvalykite visus elementusMyList. Aišku„Parodykite elementų skaičių, kad įrodytumėte, jog išvalymas pavyko„MsgBox MyList.Count“Pabaiga Sub |
Šis pavyzdys sukuria elementus masyvo sąraše ir tada išvalo masyvų sąrašą. Pranešimų langeliai įrodo masyvų sąrašo elementų skaičių prieš ir po jo.
Masyvo sąrašo metodų santrauka, skirta „Excel VBA“
| Užduotis | Parametrai | Pavyzdžiai |
| Pridėti / redaguoti elementą | Vertė | MyList.Add „Item1“ |
| „MyList“ (4) = „2 elementas“ | ||
| Klonuoti masyvo sąrašą | Nė vienas | „Dim MyList“ kaip objektas |
| Nustatykite MyList2 = MyList.Clone | ||
| Kopijuoti į masyvą | Nė vienas | „Dim MyArray“ kaip variantas |
| MyArray = MyList.ToArray | ||
| Kopijuoti į darbalapio diapazoną (eilutę) | Nė vienas | Skaičiuoklės („Sheet1“). Diapazonas („A1“). Keisti dydį (1, MyList.Count) .Value = MyList.ToArray |
| Kopijuoti į darbalapio diapazoną (stulpelį) | Nė vienas | Skaičiuoklės („Sheet1“). Diapazonas („A3“). Keisti dydį (MyList.Count, 1). Value = WorksheetFunction.Transpose (MyList.ToArray) |
| Sukurti | „System.Collections.ArrayList“ | „Dim MyList“ kaip objektas |
| Nustatykite MyList = CreateObject („System.Collections.ArrayList“) | ||
| Paskelbti | Netaikoma | „Dim MyList“ kaip objektas |
| Raskite / patikrinkite, ar elementas yra | Rasti elementą | „MyList.Contains“ („2 elementas“) |
| Raskite elemento vietą „ArrayList“ | 1. Rasti daiktą. | Šviesus indeksas |
| 2. Pozicija, nuo kurios pradėti ieškoti. | IndexNo = MyList.IndexOf („3 elementas“, 0) | |
| IndexNo = MyList.IndexOf („5 elementas“, 3) | ||
| Gaukite elementų skaičių | Nė vienas | „MsgBox MyList.Count“ |
| Įterpti elementą | 1. Indeksas - vieta įterpti ties. | „MyList.Insert“ 0, „5 punktas“ |
| 2 Vertė - objektas arba vertė, kurią reikia įterpti. | MyList. 4 intarpas, „7 punktas“ | |
| Skaityti elementą | Indeksas - ilgas sveikasis skaičius | „MsgBox“ mano sąrašas. Elementas (0) |
| „MsgBox“ mano sąrašas. 4 punktas | ||
| Skaityti paskutinį kartą pridėtą elementą | Indeksas - ilgas sveikasis skaičius | MsgBox MyList.Item (list.Count - 1) |
| Pirmiausia perskaitykite pridėtą elementą | Indeksas - ilgas sveikasis skaičius | „MsgBox“ mano sąrašas. Elementas (0) |
| Skaityti visus elementus (kiekvienam) | Netaikoma | Dim elementas kaip variantas |
| Kiekvienam „MyList“ elementui | ||
| „MsgBox“ elementas | ||
| Kitas elementas | ||
| Skaityti visus elementus (skirta) | Indeksas - ilgas sveikasis skaičius | Tamsiai ilgas |
| Jei i = 0 į „MyList.Count“ - 1 | ||
| „MsgBox“ i | ||
| Kitas I. | ||
| Pašalinti visus elementus | Nė vienas | MyList. Aišku |
| Pašalinkite elementą vietoje | Indeksuokite poziciją, kurioje yra elementas | MyList.RemoveAt 5 |
| Pašalinti elementą pagal pavadinimą | Elementas, kurį reikia pašalinti iš „ArrayList“ | MyList. Pašalinti „Item3“ |
| Pašalinkite elementų diapazoną | 1. Indeksas - pradinė padėtis. | MyList.RemoveRange 4,3 |
| 2. Skaičiuoti - elementų, kuriuos reikia pašalinti, skaičius. | ||
| Rūšiuoti mažėjančia tvarka | Nė vienas | MyList. Atvirkščiai |
| Rūšiuoti didėjančia tvarka | Ne | MyList. Rūšiuoti |
