ВБА класа - Како створити прилагођену класу и објекте у ВБА?

Преглед садржаја

Екцел ВБА модул класе

ВБА класа нам омогућава да креирамо сопствену функцију Објекта у коју можемо додати било коју врсту карактеристика, детаље командне линије, тип функције. Када креирамо Цласс у ВБА, они се понашају као потпуно независна функција објекта, али сви су повезани заједно.

Ово нам помаже у изградњи апликација попут оних које су већ у ВБА и Екцел-у. На пример, точак педала са циклусом се окреће. Педале и точкови су део циклуса, али обе раде независно дајући излаз као покретни циклус.

Како створити прилагођену класу и објекте у ВБА?

Размотримо пример мобилних телефона 3 различите компаније, а то су Аппле, Самсунг и Нокиа, с обзиром на популарне и ново покренуте мобилне телефоне ових компанија, као што су иПхоне Кс, Самсунг С8 и Нокиа 7+.

Упоредићемо неке важне функције ових мобилних телефона, као што су марка, модел, величина екрана, тип камере и тип пуњача. То су у основи важне карактеристике на тој основи. Углавном упоређујемо било који мобилни телефон. Испод смо мапирали горе описане параметре у графикону.

У прозору ВБА у менију Уметање изаберите модул класе, као што је приказано доле.

Добићемо прозор модула Цласс који почиње са Оптион Екплицит, као што је приказано доле.

Експлицитна опција осигурава да променљиве морају бити декларисане пре него што се користе. Ако не пријавимо ниједну променљиву и не користимо је, систем ће избацити грешку. Сада у класи дефинишите све расправљене параметре мерења мобилних телефона са јавношћу . Ово ће учинити те дефинисане параметре отвореним за употребу било када и било где, без икаквих ограничења.

Шифра:

Опција Експлицитно 'Листа својстава Јавни бренд као низ Јавни модел као низ Јавни екранВеличина као низ Јавна камераТип као низ Јавни пуњачТип као низ

Сада ћемо додати другачији процес рада, функције и функције мобилног телефона, као што је покретање телефона, искључивање телефона, пуштање музике, пуњење батерије итд. Са поткатегоријом за сваку функцију као што је приказано у наставку. И додајте оквир са поруком у сваку петљу поткатегорије како бисмо могли да видимо које су методе тренутно покренуте.

Шифра:

'Могуће технике Суб МобилеСтартс () МсгБок "Мобиле ис Турн Он Он" Енд Суб
Суб МобилеОфф () МсгБок „Мобилни се искључује“ Крај Суб
Суб ПлаиМусиц () МсгБок "Аудио систем тренутно ради" Крај Суб
Суб БаттериЦхарге () МсгБок "Пуњач је тренутно прикључен" Крај Суб

Овим је завршено стварање Класе. Пре него што кренемо даље, саветује се промена назива модула класе. Изаберите било које име према вашем захтеву јер га мењамо у Мобиле .

Сада ћемо написати код у модул где ћемо видети и упоредити карактеристике и функције сваке марке мобилног телефона. За ово, морамо додати модул тако што ћемо отићи тамо у менију Уметање као што је приказано.

Отворићемо нови модул с омогућеном експлицитном опцијом у овоме док радимо и стварамо класу. Почните са писањем поткатегорије у име извршених функција као што је приказано доле.

Име модула можемо променити као и за Цласс. Ово нам помаже да задржимо повезани идентитет креираног ВБА кода. То се може учинити из прозора својстава, као што је приказано доле.

Већ смо дефинисали разне функције, функције и методе свих мобилних телефона марке. Хајде сада да дефинишемо 3 променљиве у било којем имену (по могућности у имену бренда мобилног телефона) и доделимо га Мобиле. Почнимо прво са иПхонеом, као што је приказано доле.

Слично томе, учините исто за остатак марке мобилног телефона, као што је приказано у наставку.

Овим додељујемо креирану класу свакој димензионалној променљивој марке Мобиле. Сада за сваки бренд урадите исти поступак додељивања класе .

Сада морамо да доделимо све функције мобилног телефона и његову вредност. За то користите функцију Постави и доделите је новом мобилном уређају, као што је приказано доле.

Сада отворите Витх-Енд петљу за иПхоне. Овде ћемо дефинисати сваки атрибут мобилног.

Као што видимо, свим дефинисаним карактеристикама марке иПхоне доделили смо класу са одређеним вредностима као Стринг.

Урадите исто за Самсунг и Нокиа бренд.

Сада ћемо користити ДебугПринт за штампање информација у непосредном прозору. Корисно је тамо где желимо да видимо одређену променљиву у линији кода. За сваку марку мобилног уређаја изабраћемо различите функције, као што је приказано у наставку.

Сада доделите функционалне операције МобилеСтартс и МобилеОфф , које смо дефинисали у класи, сваком од брендова мобилних уређаја у истом модулу заједно са оквиром за поруке. Овде можете прескочити оквир за поруке.

Овим је завршено додељивање класе модулу. Сада компајлирајте код и покрените помоћу тастера Ф5. Видећемо поруку сваког мобилног бренда, као што је приказано у наставку.

Now, if you want to know what variables and functions have what kind of values in it, for that open the Local window from the view tab, which will help us getting the details when we compile the code as shown below.

The below code is for your Reference.

Code:

Sub VBA_Class() Dim iPhone As Mobile Dim Samsung As Mobile Dim Nokia As Mobile Set iPhone = New Mobile With iPhone .Brand = "iPhone" .Model = "iPhone X" .ScreenSize = "6.5 Inches" .CameraType = "12 MegaPixel" .ChargerType = "Regular" End With Set Samsung = New Mobile With Samsung .Brand = "Samsung" .Model = "Samsung S8" .ScreenSize = "5.8 Inches" .CameraType = "12 MegaPixel" .ChargerType = "Power" End With Set Nokia = New Mobile With Nokia .Brand = "Nokia" .Model = "Nokia 7+" .ScreenSize = "6 Inches" .CameraType = "12 MegaPixel" .ChargerType = "Power" End With Debug.Print "Phone Screen Size is: " & iPhone.ScreenSize Debug.Print "Camera of Samsung is: " & Samsung.CameraType Debug.Print "Charger Type is: " & Nokia.ChargerType iPhone.MobileStarts iPhone.MobileOff MsgBox iPhone.Model Samsung.MobileStarts Samsung.MobileOff MsgBox Samsung.Model Nokia.MobileStarts Nokia.MobileOff MsgBox Nokia.Model End Sub

Pros

  • We can build our own application with a lot of features.
  • Once Class is created, we can update any feature, anytime whenever we require.
  • If we update the code, then also it won’t cause any problem in other parts of the Class.
  • We can test the individual part of the application as per our needs.

Cons

  • Initially, it takes a lot of time to create a class in VBA.
  • People who are new to VBA will find the class very difficult to apply.

Things to Remember

  • As the code can be huge and big, so it’s better to compile the code step-by-step. By doing this, we would avoid the N number of errors, which will be difficult for us to debug and resolve.
  • We can ignore the use of Message Box if you are taking and testing the above-written code.
  • За тестирање можете користити мање технике или функције при креирању класе. Ово се касније може изменити када желимо да додамо више функција и техника производа.
  • Увек узмите у обзир сличне или исте карактеристике када завршимо Класу и доделимо је Модулу. Ово ће нам помоћи у поређењу карактеристика различитих производа.

Занимљиви Чланци...

Рецоммендед