Проблема с сортировкой массива VB

[Heng]

Непонятно почему вылезает за границы массива
может есть идеи ?

Public Shared Mmas(64) As Integer

i = 1
        Do While i < Mmas.Length()
            j = i - 1
            k = Mmas(i)
            Do While j >= 0 And Mmas(j) > k !!!!ВОТ ЗДЕСЬ !!!!!!
                Mmas(j + 1) = Mmas(j)
                j = j - 1
                Mmas(j + 1) = k
            Loop
            i = i + 1
        Loop

[SaLoKiN]

Дебагером смотрели?

Не совсем помню как работает DO WHILE, но сдается мне что он пытается проверить второе условие внутреннего цикла, при j=-1. и тем самым ругается...

[DiemonStar]

Непонятно почему вылезает за границы массива
может есть идеи ?

Почему вы так решили? проверил алгоритм - все работает. все элементы от 0 до 64 сортируются.

upd.

Public Shared Mmas(64) As Integer

Это в каком приложении используется такой вариант объявления массива? в моем 2007 экселе такой не прокатывает.

[SaLoKiN]

Попробуйте массив со значениями 64,63...1,0
Мне кажется он в начале падать может. Пишу кажется, потому что нет компилятора под рукой. а моск и блокнот не дают покоя =)