Cool! Wäre auf so eine stringente Variante nicht gekommen... Merci Mike
Am 01.04.08 14:49 schrieb "Andy Fuchs" unter <[EMAIL PROTECTED]>: > Sowas? > > dim arr(-1) as string > dim i as Integer > > arr = Split(EditField1.text, EndOfLine.Macintosh) > > for i = 0 to Ubound(arr)-1 > > Speak arr(i) > > next
