Daten aufteilen

[Kaeru Gaman]

hihi.... AND packt mal wieder die Spatzenkanone aus...

[AND51]

Hm... Naja, ein bisschen Overkill ist das vielleicht, aber mir fiel der Befehl sofort ein, als TobiasR sagte, dass er eine Arraylösung bevorzugt.

[rolaf]

Zudem verwirt es Anfänger meist wenn das Array ab 0 gefüllt wird, das gibt dann meist Probleme in den folgenden Schleifen weil gerne vergessen wird bei 0 zu starten und am Ende 1 abzuziehen.

[AND51]

Dies gehört genau zu den raffinierten Programmierkniffen, die ein Anfänger wissen muss, um ein Profi zu werden. Irgendwann muss man es wissen, und wenn man sich jetzt nicht damit auseinandersetzt - wann dann? Dies ist eine gute Gelegenheit, sich anzuschauen, wie ein null-basiertes Array funktioniert.

[Kaeru Gaman]

also, da würde ich aber eher mit nem nackten Nullbasierten Array anfangen,
sprich, meinen code auf 0-7 umschreiben,
anstatt diese Mini-Problemstellung mit nem RegEx zu erschlagen.

Code: Alles auswählen

Dim V(7) ; 8 elemente: 0-7

string.s="0-0-28-24-0-1-0-105"

For n=0 To 7
  V(n) = Val( StringField( string, n+1, "-") )    ; n+1 weil unser Array bei 0 anfängt
  Debug "Feld Nr." +Str(n) + " = " + Str( V(n) )
Next

[Deluxe0321]

Warum nicht einfach so

Code: Alles auswählen

string.s="0-0-28-24-0-1-0-105"
;das alternative RegEx ^^
SCount.l=CountString(string.s,"-")

Dim V(SCount.l)

For n=0 To SCount.l
  V(n) = Val( StringField( string, n+1, "-") )    ; n+1 weil unser Array bei 0 anfängt
  Debug "Feld Nr." +Str(n) + " = " + Str( V(n) )
Next

[AND51]

also, da würde ich aber eher mit nem nackten Nullbasierten Array anfangen
[...]
n+1 weil unser Array bei 0 anfängt

LOL?

Dann musst du die Befehle aber auch richtig erklären.

Hier wird n+1 gerechnet, weil StringField() eins-basierend ist. Die For-Schleife zählt bereits korrekt!

[Kaeru Gaman]

denn schreib dochn tutorial, wenn du so genau sein willst, wird oft genug nach gefragt.

[ts-soft]

>> denn schreib dochn tutorial
Keine gute Idee
Laß das lieber jemand anders machen, der es ohne Überheblichkeit formuliert

@AND51
nicht böse sein, mußte raus

[Kaeru Gaman]

ok, point taken.