Ši pamoka parodys, kaip kurti ir dirbti su variantų masyvais.
Masyvo varianto tipas
Masyvas yra kintamojo tipas. Kaip ir kiti kintamieji, masyvai deklaruojami naudojant modulio ar procedūros lygio masyvo Dim Statement arba pasaulinio masyvo viešą teiginį.
Masyvo variantas yra masyvas, kuris deklaruojamas kaip turintis duomenų tipo variantą. Įvairiuose duomenų tipuose galima saugoti bet kokio tipo vertes: tekstą, skaičius, datas, laiką ar objektus.
Variantų masyvo pranašumai
Variantų masyvai yra ypatingi, nes su jais lengviau dirbti nei su įprastais masyvais.
- Juos lengviau deklaruoti.
- Jums nereikia jaudintis, kokio tipo duomenys įvedami į masyvą (pvz., Jei langelyje yra teksto ar skaičių).
- Galite užpildyti masyvą naudodami masyvo funkciją (jei masyvo dydis nėra apibrėžtas, kai jis deklaruojamas).
- Jums nereikia naudoti REDIM sakinio, kad pakeistumėte masyvą arba iš naujo užpildytumėte masyvą (jei masyvo dydis nenurodomas deklaruojant).
Varianto masyvo paskelbimas
Norėdami paskelbti masyvo variantą, galite parašyti šį paprastą teiginį
| 1 | Dim varNames () |
Tai laikoma a dinamiškas masyvo variantas.
Atminkite, kad jums nereikia nurodyti duomenų tipo (manoma, kad tai variantas) arba masyvo dydis.
Priskirkite vertes variantų masyvui
Variantų masyvuose gali būti bet kokio tipo reikšmės: tekstas, skaičiai, datos, laikas ar objektai.
Norėdami priskirti reikšmes masyvo variantui, galite naudoti masyvo funkciją:
| 12 | 'užpildyti masyvąvarNames () = masyvas („Fred“, „Wilma“, „Barney“, „Betty“) |
Šis metodas jums gali būti lengvesnis nei naudojant standartinį metodą:
| 12345 | “užpildykite kiekvieną elementąvarNames (0) = "Fredas"varNames (1) = "Vilma"varNames (2) = "Barnis"varNames (3) = "Betty" |
Keisti variantų masyvo dydį
Dinaminių variantų masyvai vykdymo metu gali pakeisti dydį. Jums nereikia naudoti tipiškų Redimas arba Redim draustinis teiginiai, reikalingi norint pakeisti standartinių masyvų dydį.
Variantų masyvo pavyzdys
Sudėjus visa tai, ši procedūra užpildys ir iš naujo užpildys variantų masyvą:
| 123456789101112 | Sub TestArray ()“paskelbti kintamąjįDim varNames () Kaip variantas'užpildyti masyvąvarNames () = masyvas („Fred“, „Wilma“, „Barney“, „Betty“)“grąžinkite vertybesPrisijunkite prie „MsgBox“ (varNames, „,“)“iš naujo užpildyti masyvąvarNames () = masyvas (400, 500)“grąžinkite naujas vertybesPrisijunkite prie „MsgBox“ (varNames, „,“)Pabaiga Sub |
Mes apgyvendinome varNames masyvas su 4 pavadinimais, o po to su 2 skaičiais. Pranešimų langeliai bus rodomi taip.
