For i = 0 to (UBound(ditArray)-1) min = i For j = (i + 1) to UBound(ditArray) if UCase(ditArray(j)) < UCase(ditArray(min)) then min = j end if temp = ditArray(min) ditArray(min) = ditArray(i) ditArray(i) = temp Next Next
Koden ovenfor, sorterer et 1-dimensionelt array, så det skal nok lige rettes til, hvis du vil have 2 dimensioner.
>> bilbo, Ja tak skal du have, det var også lige den jeg manglede... *GG*
* MoRoax...
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.