Изявление за тип VBA (пример) - Как да декларирам променливи с тип VBA?

Типът е оператор във VBA, който се използва за дефиниране на променливи, подобни на функцията DIM, използва се на дефинирано от потребителя ниво, когато имаме една или повече стойности в променлива, има две номенклатури за оператор тип, който е публичен или частен те не са задължителни за използване, но името на променливата и името на елемента са задължителни.

Какво представлява Type Statement в Excel VBA?

VBA Type Statement се използва за дефиниране на променливи под едно име на група с различни типове данни, присвоени на всяка променлива. Това ни помага да групираме множество променливи под един обект, за да ги използваме под определеното име на типа.

Като декларираме оператора Type, можем да избегнем използването на модули Class във VBA. Не се нуждае от низови модули, защото може да бъде вграден във вече съществуващи модули, което може да ни спести място.

В една от по-ранните статии обсъдихме „VBA ENUM“, за да групираме всички променливи под името на една група.

Например, ако имате име на група, наречена „Мобилни телефони“, имаме членове на групата като „Redmi, Oppo, Vivo, Samsung, LG и др …“ Така че изявлението на Enum можем да групираме заедно със съответните им стойности.

Enum Mobiles

Redmi = 12000

Oppo = 18000

Vivo = 18000

Samsung = 25000

LG = 15000

Край на Enum

По този начин ние създадохме изброявания в тази статия. Проблемът с израза Enum, тъй като той може да съдържа само ДЪЛГО тип данни. За да групираме заедно променливи с различни типове данни, можем да използваме „VBA TYPE Statement“. В тази статия ще ви покажем как да изградите оператор Type в VBA. Прочетете нататък …

Синтаксис

Преди да декларирате променливи с помощта на оператор Type, разгледайте синтаксиса:

Тип име на група   (променлива 1) като променлива тип данни   (променлива 2) като променлива тип данни   (променлива 3) като променлива тип данни   (променлива 4) като променлива тип данни   (променлива 5) като променлива тип данни  краен тип

Тези типове изявления могат да бъдат декларирани в рамките на модула, както и в горната част на модула, като нашите глобални променливи в VBA.

Типът VBA може да съдържа обектни променливи. Той може да побира масиви. Той обаче не може да съдържа процедури, функции.

Пример за изявление на типа във VBA

Добре, нека започнем процеса на деклариране на променливи с оператора Type. Ще видим същия пример за деклариране на мобилни марки като начина, по който сме използвали във VBA Enum.

Стъпка 1: В горната част на модула стартирайте думата „Тип“ и дайте име на типа група.

Код:

Тип MobileBrands Краен тип

Стъпка 2: В мобилните марки какви са нещата, които обикновено виждаме. Първо виждаме Name, затова декларирайте променливата като Name като String.

Код:

Въведете име на MobileBrands като тип край на низ

Стъпка 3: След името проверяваме датата на стартиране. Обявете променливата като LaunchDate като дата.

Код:

Тип MobileBrands Name As String LaunchDate As Date End Type

Стъпка 4: Следващото нещо е да проверим капацитета за съхранение. Да декларираме променливата като Storage като Integer.

Код:

Тип MobileBrands Name As String LaunchDate As Date Storage As Integer End Type

Стъпка 5: Следващото нещо е да проверим капацитета на RAM.

Код:

Тип MobileBrands име като низ LaunchDate като дата съхранение като RAM като цяло цяло тип край

Стъпка 6: Най-накрая проверяваме за цената.

Код:

Тип MobileBrands Име като низ LaunchDate Като дата Съхранение като цяло цяло RAM като цяло цяло цена като дългосрочен тип

Сега в Подпроцедурата чрез деклариране на променливата като Тип, Име, т.е. MobileBrands, можем да осъществим достъп до всички тези типове данни с променливи.

Step 7: Create a subprocedure.

Code:

Sub Type_Example1() End Sub

Step 8: Now declare the variable “Mobile” as MobileBrnads.

Code:

Sub Type_Example1() Dim Mobile As Mob End Sub

Step 9: Now, with the variable name “Mobile,” we can access all the variables of “MobileBrands.”

Code:

Step 10: Now store each value like the below.

Code:

Type MobileBrands Name As String LaunchDate As Date Storage As Integer RAM As Integer Price As Long End Type Sub Type_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

Finally, show the result in a VBA message box like the below one.

Code:

Sub Type_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

Now run the code using the F5 key or manually and see the result in a message box.

Like this, we can use the “VBA Type” statement to define new data types in the subprocedure.

VBA Types vs. VBA Class

VBA Type is often compared to VBA Class modules. There are certain differences between them. Below are the common differences.

  • Разлика 1: Типът VBA може да съдържа само публични променливи. VBA клас може да съдържа както публични, така и частни променливи.
  • Разлика 2: Типът VBA не може да съдържа процедури и функции. VBA клас съдържа и двете заедно със свойствата.
  • Разлика 3: Типът VBA може да бъде деклариран във всеки от модулите и процедурите. VBA клас може да бъде деклариран само в специални модули за клас.

Интересни статии...