Array sortieren und doppelte löschen

[Heinz1980]

Hi, hab folgendes Problem und moechte gerne wissen wie ihr das loesen würdet:

Ich habe ein Array und möchte alle Doppelten eintraege loeschen und sortieren.

Fürs Sortieren hab ich folgendes schon gefunden

function bubblesort(arrSortieren)
for i = 0 to ubound(arrSortieren)
for j = i + 1 to ubound(arrSortieren)
if arrSortieren(i) > arrSortieren(j) then
arrTemp = arrSortieren(i)
arrSortieren(i) = arrSortieren(j)
arrSortieren(j) = arrTemp
end if
next
next
bubblesort = arrSortieren
end function

Jetzt waer nur was sinnvolles noch nötig um doppelte zu löschen.

Danke schon mal

Gruss
Heinz