Är det ngn som vet om VB tillhandahåller några färdiga funktioner för detta, typ quicksort, bubblesort, binarysearch osv.. Eller måste man skriva dem själv ?

du måste nog tyvärr skriva dem själv ... Men det är faktiskt inte särskilt svårt

Suck, men tack ändå.

Varför laddar du inte ner de Quicksort och bubblesort som ligger
uppladdade här på pellesoft? Minns inte var jag hittade dem, men om jag
inte missminner mig var det under Tips och tricks man hittade bubblesort
och Filarean för Quicksort. Kanske tom finns fler sorteringsalgoritmer
upplagda...

/Emma

Kan detta vara något till hjälp !!

<code>
Public Sub SortArray(rgsArray() As String)
Dim l As Long
Dim j As Long
Dim best_value1 As String
Dim best_value2 As String
Dim best_value3 As String
Dim best_j As Long

For i = 0 To UBound(rgsArray, 2) - 1
best_value1 = rgsArray(1, i)
best_value2 = rgsArray(2, i)
best_value3 = rgsArray(3, i)
best_j = i

For j = i + 1 To UBound(rgsArray, 2)
If rgsArray(2, j) < best_value2 Then
best_value1 = rgsArray(1, j)
best_value2 = rgsArray(2, j)
best_value3 = rgsArray(3, j)
best_j = j
End If
Next j

rgsArray(1, best_j) = rgsArray(1, i)
rgsArray(2, best_j) = rgsArray(2, i)
rgsArray(3, best_j) = rgsArray(3, i)
rgsArray(1, i) = best_value1
rgsArray(2, i) = best_value2
rgsArray(3, i) = best_value3
Next i
End Sub
</code>

Det kan det säkert, man tackar.