Преглед садржаја
Овај водич ће вас научити како да добијете дужину (величину) низа у ВБА.
Гет Арраи Ленгтх
Да бисте добили дужину низа, морате знати почетну и крајњу позицију низа. То можете учинити помоћу ВБА -ових функција УБоунд и ЛБоунд.
ЛБоунд и УБоунд функције
Ова процедура показује како се користе функције УБоунд и ЛБоунд на низу са једном димензијом:
| 123456 | Суб УБоундЛБоунд ()Дим екАрр (1 до 4) Ас СтрингМсгБок УБоунд (екАрр)МсгБок ЛБоунд (екАрр)Енд Суб |
Одузимањем два добићете дужину низа (УБоунд - ЛБоунд +1).
Преузмите функцију дужине низа
Ова функција ће израчунати величину (дужину) једнодимензионалног низа:
| 1234567 | Јавна функција ГетАррЛенгтх (а Ас Вариант) Ас ЛонгАко је ИсЕмпти (а) ТадаГетАррЛенгтх = 0ИначеГетАррЛенгтх = УБоунд (а) - ЛБоунд (а) + 1Крај АкоЗавршна функција |
Набавите величину 2Д низа
Ова функција ће израчунати број позиција у дводимензионалном низу:
| 12345678910111213141516171819 | Суб тестАрриСизе ()Дим арр2Д (1 То 4, 1 То 4) Ас ЛонгМсгБок ГетАррСизе_2Д (арр2Д)Енд СубЈавна функција ГетАррСизе_2Д (а Ас Вариант) Ас ЛонгДим к Ас Лонг, и Ас ЛонгАко је ИсЕмпти (а) ТадаГетАррСизе_2Д = 0Иначек = УБоунд (а, 1) - ЛБоунд (а, 1) + 1и = УБоунд (а, 2) - ЛБоунд (а, 2) + 1ГетАррСизе_2Д = к * иКрај АкоЗавршна функција |
