VBA tipa paziņojums (piemērs) Kā deklarēt mainīgos ar VBA tipu?

Tips ir paziņojums VBA, ko izmanto, lai definētu mainīgos, kas līdzīgi funkcijai DIM, to izmantoja lietotāja definētā līmenī, kur mums ir viena vai vairākas vērtības mainīgajā, tipa paziņojumam ir divas nomenklatūras, kas ir publiska vai privāta tie nav obligāti lietojami, taču ir nepieciešami mainīgā nosaukums un elementa nosaukums.

Kas ir tipa paziņojums programmā Excel VBA?

VBA tipa paziņojums tiek izmantots, lai definētu mainīgos zem viena grupas nosaukuma, katram mainīgajam piešķirot dažādus datu tipus. Tas palīdz mums grupēt vairākus mainīgos zem viena objekta, lai tos izmantotu zem definētā tipa nosaukuma.

Deklarējot tipa paziņojumu, mēs varam izvairīties no klases moduļu izmantošanas VBA. Tam nav nepieciešami virkņu moduļi, jo tos var iegult jau esošajos moduļos, kas var ietaupīt mums vietu.

Vienā no iepriekšējiem rakstiem mēs esam apsprieduši “VBA ENUM”, lai visus mainīgos sagrupētu zem vienas grupas nosaukuma.

Piemēram, ja jums ir grupas nosaukums ar nosaukumu “Mobiles”, mums ir grupas dalībnieki, piemēram, “Redmi, Oppo, Vivo, Samsung, LG un citi.” Tātad Enum paziņojumu mēs varam grupēt kopā ar viņu attiecīgajām vērtībām.

Enum Mobiles

Redmi = 12000

Opo = 18000

Vivo = 18000

Samsung = 25000

LG = 15000

Beigas Enum

Šādi mēs šajā rakstā esam izveidojuši uzskaitījumus. Problēma ar Enum paziņojumu, jo tajā var ievietot tikai LONG datu tipu. Lai grupētu mainīgos ar dažādiem datu tipiem, mēs varam izmantot “VBA TYPE Statement”. Šajā rakstā mēs parādīsim, kā VBA izveidot tipa paziņojumu. Turpini lasīt…

Sintakse

Pirms deklarējat mainīgos, izmantojot ierakstu Type, apskatiet sintaksi:

Type Group Name             [Variable 1] kā Variable Data Type             [Variable 2] kā Variable Data Type             [Variable 3] kā Variable Data Type             [Variable 4] kā Variable Data Type             [Variable 5] kā Variable Data Type End Type

Šāda veida paziņojumus var deklarēt gan modulī, gan moduļa augšdaļā, piemēram, mūsu globālos mainīgos VBA.

VBA Type var saturēt objektu mainīgos, tajā var ievietot masīvus. Tomēr tajā nevar būt procedūras, funkcijas.

VBA veida paziņojuma piemērs

Šo VBA tipa paziņojuma veidni varat lejupielādēt šeit - VBA tipa paziņojuma veidne

Labi, ļaujiet sākt mainīgo mainīšanas procesu ar paziņojumu Type. Mēs redzēsim to pašu piemēru, kā deklarēt mobilos zīmolus, piemēram, kā mēs esam izmantojuši VBA Enum.

1. solis: Moduļa augšdaļā sāciet vārdu “Type” un piešķiriet nosaukumu Type of group.

Kods:

 Tips MobileBrands End Type 

2. solis: mobilajās preču zīmēs mēs parasti redzam lietas. Vispirms mēs redzam vārdu Vārds, tāpēc deklarējiet mainīgo kā Nosaukums kā virkni.

Kods:

 Ierakstiet MobileBrands nosaukumu kā virknes beigu veidu 

3. solis: Pēc nosaukuma mēs pārbaudām palaišanas datumu. Pasludiniet mainīgo kā LaunchDate kā datumu.

Kods:

 Ierakstiet MobileBrands nosaukumu kā virkni LaunchDate kā datuma beigu veidu 

4. solis: Nākamā lieta ir pārbaudīt krātuves ietilpību. Lai mainīgo mainītu kā Storage kā Integer.

Kods:

 Ierakstiet MobileBrands nosaukumu kā virkni LaunchDate kā datuma krātuvi kā veselu skaitļa beigu veidu 

5. solis: Nākamā lieta ir pārbaudīt RAM ietilpību.

Kods:

 Ierakstiet MobileBrands nosaukumu kā virkni LaunchDate kā datumu krātuvi kā RAM kā veselu beigu veidu 

6. solis: Beidzot mēs pārbaudām cenu.

Kods:

 Ierakstiet MobileBrands nosaukumu kā virknes palaišanas datumu kā datuma krātuvi kā veselo RAM kā veselo cenu kā garo galu. 

Tagad apakšprocedūrā, deklarējot mainīgo kā tipa nosaukumu, ti, MobileBrands, mēs varam piekļūt visiem šiem mainīgo datu tipiem.

7. darbība: izveidojiet apakšprocedūru.

Kods:

 Apakšgrupa_piemērs1 () Beigu apakšgrupa 

8. solis: Tagad deklarējiet mainīgo “Mobile” kā MobileBrnads.

Kods:

 Apakšgrupa_piemērs1 () Blāvs mobilais kā mob. Beigu apakšgr 

9. solis: Tagad ar mainīgā nosaukumu “Mobile” mēs varam piekļūt visiem “MobileBrands” mainīgajiem.

Kods:

10. solis: Tagad saglabājiet katru vērtību, kā norādīts zemāk.

Kods:

 Ierakstiet MobileBrands nosaukumu kā virknes palaišanas datumu kā datuma krātuvi kā veselu RAM kā veselu cenu kā garu galu. Tips Sub tips_Example1 () Dim Mobile As MobileBrands Mobile.Name = "Redmi" Mobile.LaunchDate = "10-Jan-2019" Mobile.Storage = 62 Mobile.RAM = 6 Mobile.Price = 16500 MsgBox Mobile.Name & vbNewLine & Mobile.LaunchDate & vbNewLine & _ Mobile.Storage & vbNewLine & Mobile.RAM & vbNewLine & Mobile.Price End Sub 

Visbeidzot, parādiet rezultātu VBA ziņojumu lodziņā, piemēram, zemāk.

Kods:

 Apakštipa_piemērs1 () Dim Mobile kā MobileBrands Mobile.Name = "Redmi" Mobile.LaunchDate = "2019. gada 10. janvāris" Mobile.Storage = 62 Mobile.RAM = 6 MobilePrice = 16500 MsgBox Mobile.Name & vbNewLine & Mobile. LaunchDate & vbNewLine & _ Mobile.Storage & vbNewLine & Mobile.RAM & vbNewLine & Mobile.Price End Sub 

Tagad palaidiet kodu, izmantojot F5 taustiņu vai manuāli, un rezultātu redziet ziņojumu lodziņā.

Šādi mēs varam izmantot paziņojumu “VBA tips”, lai apakšprocedūrā definētu jaunu datu tipu.

VBA veidi pret VBA klasi

VBA tips bieži tiek salīdzināts ar VBA klases moduļiem. Starp tām ir noteiktas atšķirības. Zemāk ir kopīgās atšķirības.

  • 1. atšķirība: VBA tips var saturēt tikai publiskos mainīgos. VBA klasē var būt gan publiskie, gan privātie mainīgie.
  • 2. atšķirība: VBA tips nevar saturēt procedūras un funkcijas. VBA klasē ir abas kopā ar īpašībām.
  • 3. atšķirība: VBA tipu var deklarēt jebkurā no moduļiem un procedūrām. VBA klasi var deklarēt tikai īpašos klases moduļos.

$config[zx-auto] not found$config[zx-overlay] not found