[VB6] Split array's

[Praetorian]

Het doet mij zeer om hier te moeten posten 'k heb het zo lang mogelijk uitgesteld jongens...

Okay, situatie...

Ik heb een string bv. bla1\bla2\bla3

Ik split ze gewoon dmv de split functie.. peace of cake

code:

aArray = Split("bla1\bla2\bla3", "\")

Als het goed is krijg ik nu 3 array's!

aarray(0), aarray(1) en aarray(2)

Nou is het zo dat mijn string niet altijd uit 3 delen bestaat, ook wel eens uit 4 of 6 delen!

Hoe 'detecteer' ik het einde...

code:

aArray = Split("bla1\bla2\bla3", "\")

do While aArray() is not nothing
loop

Was leuk geprobeerd, maar het komt er op neer dat ik heel veel het geprobeerd, maar ik blijf error's houden... Hellup

[DaRace]

ubound(aArray) misschien??

[Praetorian]

Kijk eens aan, ik zat heel de tijd de kloten met aarray(uCase)

ubound kon ik al niet vinden... hier is nu geworden:

code:

aArray = Split("bla1\bla2\bla3", "\")
Dim bla As Integer
For i = 0 To UBound(aArray)

Text1 = Text1 & aArray(i)
Next

Thanx!

[Verwijderd]

Topic alweer opgelost . maar even voor de terminologie. Split() levert geen 3 array's op, maar 1 array met een aantal items.

[Praetorian]

Nouja.... opgelost, hehehehe

NOG een probleem, maar nu een kleine kwestie, i think

Voor m'n programma moet er dus niet alleen gesplitst worden, maar ook omgedraaid, dus eerst moet bla3 dan bla2 en dan bla1 komen...

code:

For i = Ubound To LBound(aArray)

of

code:

For i = UBound(aArray) to 0

Werkt natuurlijk niet.... (nee, was ook te mooi om waar te zijn)

[Praetorian]

Oke, komt er een mod langs, dan mag deze op slot...

Nou denken jullie natuurlijk, wat was het nou?!

Heel voor de hand liggend eigenlijk weer, zet "Step -1" achter die eerste code