Преглед садржаја
Овај водич ће показати како сортирати вредности у низу у ВБА
Сортирање једнодимензионалног низа помоћу петље
Сортирање низа захтева мало манипулације подацима помоћу петљи, променљивих и привремених низова.
- Прво морате попунити низ својим вредностима
- Затим морате двапут проћи кроз низ! Једном да бисте добили вредност из тренутног низа елемената, а док је још у тој петљи, да бисте добили вредност следећег елемента у низу.
- Затим морате да упоредите елементе - и померите другу на позицију прве ако је друга абецедним редом ПРИЈЕ прве.
Пример испод приказује ову процедуру.
| 1234567891011121314151617181920212223 | Подразврстани низ ()Дим и Ас Лонг'Подесите низДим стрНаме () Као варијантаДим Темп Ас Вариант'попуни низстрНаме () = Арраи ("Боб Смитх", "Јохн Давиес", "Фред Јонес", "Стеве Јенкинс", "Боб Виллиамс")'прођите кроз границу аррија и добијте имеЗа и = ЛБоунд (стрНаме) За УБоунд (стрНаме) - 1'поново прођите и проверите да ли је следеће име абецедним редом пре или после оригиналаЗа ј = и + 1 до УБоунд (стрНаме)Ако УЦасе (стрНаме (и))> УЦасе (стрНаме (ј)) Затим'ако име треба преместити пре претходног имена, додајте га у привремени низТемп = стрНаме (ј)'пребаци именастрНаме (ј) = стрНаме (и)стрНаме (и) = ТемпКрај АкоСледеће јЗатим сам'Изнесите низ кроз оквир за порукуМсгБок Јоин (стрНаме (), вбЦрЛф)Енд Суб |
Ако покренете ову процедуру, добићете следеће поље за поруку.
Такође можете сортирати низ у другом смеру - на пример: од З до А променом ове линије кода
| 1 | Ако УЦасе (стрНаме (и))> УЦасе (стрНаме (ј)) Затим |
на ову линију кода
| 1 | Ако је УЦасе (стрНаме (и)) <УЦасе (стрНаме (ј)) Тада |
Тада ћете добити следеће поље за поруку.
