Re: Array Sort geht schief

[Stefan Mettenbrink <S dot Metti at gmx dot de>]

Stefan Sicurella wrote:

> Dim ae(505) as string
>
> ae(0)="eins"
> ae(1)="zwei"
> ae(2)="drei"
> ae(3)="drei"
> ae(4)="VIER"
> ae(5)=""
> for i=6 to 500
> ae(i)=0
> next
> MsgBox 
> str(UBound(ae))+":"+(ae(0))+(ae(1))+(ae(2))+(ae(3))+(ae(4))+(ae(5))
> ae.sort
> MsgBox 
> str(UBound(ae))+":"+(ae(0))+(ae(1))+(ae(2))+(ae(3))+(ae(4))+(ae(5))
ae(i)=0 geht nicht. Habe ich in ae(i)="null" geändert.
Nach dem Sortieren sind die Werte von 5, 501- 505 am Anfang. Da dort der 
String "" drin steht, wird auch nicht viel ausgegeben.
MfG, Metti.