Ich w�rde das so machen:
t = "~"
For i=0 to uBound(Zahlen)
If instr(t,"~"&zahlen(i)&"~") = 0 then
t = t & zahlen(i) & "~"
End if
NeuListe = Split(mid(t,1),"~")
-----Urspr�ngliche Nachricht-----
Von: Alexander Zeitler [mailto:[EMAIL PROTECTED]
Gesendet: Donnerstag, 03. Juli 2003 13:14
An: [EMAIL PROTECTED] Com
Hallo,
ich habe eine (beliebig lange) Reihe von Zahlen.
Einige dieser Zahlen k�nnen mehrfach
vorkommen. Ich m�chte aber jede Zahl
nur einmal (also im Prinzip DISTINCT,
nur ohne DB/SQL).
Hat da jemand evtl. einen Algorythmus
im Hinterkopf?
Gruss
Alex
www.aspintranet.de
~~~~~~~~~~~~~~~~~~~~~~~~~~~sponsored by United Planet~~~~~~~~~~~~~~~~~
Kaffeepause im United Planet Communityserver ...
http://www.intrexx.com/communityserver
_______________________________________________
Coffeehouse mailing list
[EMAIL PROTECTED]
http://www.glengamoi.com/mailman/listinfo/coffeehouse
~~~~~~~~~~~~~~~~~~~~~~~~~~~sponsored by United Planet~~~~~~~~~~~~~~~~~
Kaffeepause im United Planet Communityserver ...
http://www.intrexx.com/communityserver
_______________________________________________
Coffeehouse mailing list
[EMAIL PROTECTED]
http://www.glengamoi.com/mailman/listinfo/coffeehouse
