element=Array(i)               next

………………………

Next

Продолжая развивать тему операций с массивами, необходимо уделить внимание механизму упорядочивания массивов и поиску среди элементов массива заданного выражения.

Наиболее простым методом упорядочивания массивов является пузырьковый метод. Суть метода заключается в том, что при несоблюдении условия упорядочивания массива смежные элементы меняются местами. Тем самым элементы массива становятся друг за другом в заданном порядке – происходит упорядочивание.

Пример 2

    Dim Array(100)

    ……………………

    For j=0 to Ubound(Array)

           For i=0 to Ubound(Array)

                 If StrComp(Array_sort(i),Array_sort(i+1),0)=1 Then

                        temp=Array(i)

                        Array (i)=Array(i+1)

                        Array(i+1)=temp

                 End if

           Next

    Next

Осуществление процедуры поиска в независимости от регистра символов является задачей, решать которую приходится очень часто. Для обеспечения процедуры поиска формируется массив, среди элементов которого происходит поиск. Для того чтобы сделать функцию поиска нечувствительной к регистру символов, необходимо использовать функцию, преобразующую все символы строки в большие или в маленькие. Это касается как элементов массива, так и искомой строки. Для преобразования строки в маленькие буквы используют функцию Lcase(string), для преобразования в большие – Ucase(string).

Пример 3

Dim Array(100)

………………..

Dim SearchString="string"