Sorter array

En dimentional sort:
http://www.4guysfromrolla.com/webtech/011001-1.shtml
http://www.4guysfromrolla.com/webtech/012799-2.shtml


To dimentinal array sort:
http://www.4guysfromrolla.com/webtech/012799-3.shtml
http://www.4guysfromrolla.com/webtech/011601-1.shtml


Du kan prøve at kigge på disse de kan sorter flere dimentioner:
http://www.4guysfromrolla.com/webtech/012799-3.shtml
http://www.evolt.org/article/Quick_and_Dirty_ASP_Array_Sorting/17/21724/

Den bedst måde at sortere på er at benytte CombSort.
Den er næsten lige så hurtig som QuickSort, men er meget simpel.

sub Sort(A)
'Denne procedure sorterer arrayet, som
'overføres ved reference.
'Det er metoden CombSort, der benyttes.
'Den er næsten lige så hurtig som QuickSort
  dim n, gap,OK,i,j,tmp
'tabellen A sorteres. CombSort
  n=Ubound(A)
  gap = n
  ok = True
  While ok
    If gap < 1 Then gap = 1
    ok = (gap <> 1)
    For i = 0 To n - gap
      j = i + gap
      If A(i) > A(j) Then
        tmp = A(j): A(j) = A(i): A(i) = tmp
        ok=true
      End If
    Next
    gap = Int(gap / 1.33) 'Tallet 1.33 er bedst
  Wend
end sub

Hvis du har et array Q, så vil ordren
Sort Q
resultere i, at nu er Q sorteret.

Det ser godt ud, men ingen af løsningerne virker når det er Double værdier i array'et.

Nu ser jeg du ønsker det største element først.
Men så skal du blot ændre linien
If A(i) > A(j) Then
til
If A(i) < A(j) Then

hvad mener du med Double-værdier?
Jeg troede du mente tal af typen Dbl
(altså flydende tal med mange cifre)

det er det jeg mener, sorry :)

men er det et aray af typen
1,2
3,4
5,6
hvordan ønsker du det så sorteret?
er 1,2<3,1 og 1,3 er > 1,2

CombSort virker fint, bortset fra at den sorterer kun det første ciffer. F.eks. kommer 1 før 19.

Lad os lige gøre os klart, hvad det er, der skal sorteres.
Giv et konkret eksempel(et array med 5 dobbelte elementer )

Du skal bare sætte CDbl omkring denne if sætning, det for di ComboSort ikke har noget type tjek.:
If A(i) > A(j) Then

Sådan her:

If CDbl(A(i)) > CDbl(A(j)) Then

Noget tyder på at dit array indeholder tekst.

Hvordan opretter du det?

Jeg smed indholdet over  i et 2 dimensionalt array, og brugte eagleeye's første løsning.