Re: Array Problem

[Johannes Ungerer <johannes dot ungerer at gmx dot de>]

Der "eigentlich wichtige" Code sieht wie folgt aus:

  Dim ListeA("a","b","c",...),ListeB() as string

>   While Ubound(ListeA)>0
>     ListeB.Append ListeA(i)
>     ListeA.Remove(i)
>     If Umrechnung(ListeB)<1 then
>       ListeB.Remove(UBound(ListeB))
>     end if
>   Wend

> Sub Umrechnung(ListeB as String) as Integer
>   If ListeB=not "a" then
>     Return 1
>   else
>     Return 0
>   End if
> End Sub
ListeB wird also in der Methode Umrechnung nicht verändert, trotzdem  
ist das Array hinterher leer (d.h. = –1)

Gruß,
Johannes