|
| Autor |
Nachricht |
nicok
Poster
Anmeldedatum: 15.05.2008
Beiträge: 161
|
String zerlegen
Verfasst am: 16.07.2008, 08:54 |
|
|
Hi,
ich habe einen langen String (Bsp.
aufzaehlung = "Buch!-!Heft!-!Stift!-!Auto!-!"
Als Trennzeichen der einzelnen Wörter habe ich "!-!"
(Leerzeichen geht nicht, da die Wörter selber auch ein Leerzeichen haben könnten)
Das wichtige ist das ich nicht weiß wieviele Wörter ich habe.
Nun soll mit einer Schleife jedes einzelne Wort in einer Listbox (List1) eingetragen werden.
Hoffe mir kann jemand helfen! |
|
| |
|
 |
sollniss
Überflieger
Anmeldedatum: 01.05.2008
Beiträge: 699
|
Verfasst am: 16.07.2008, 09:28 |
|
|
Pseudocode:
Visual Basic: [code]auzählung = "Buch!-!Heft!-!Stift!-!Auto!-!"
dim aufgezeilt as string = split(aufzählung, "!-!")
for i as integer = 0 to ubound(aufzählung) -1
list1.additem(aufgeteilt(i))
next[/code] |
|
| |
|
|
nicok
Poster
Anmeldedatum: 15.05.2008
Beiträge: 161
|
Verfasst am: 16.07.2008, 10:15 |
|
|
Mh die splitt Methode hab ich auch schon ausprobiert.
Aber sobald ich mehr als 26 Wörter habe bzw mein String öfters als 26-mal zerlegt wird bekomme ich die Meldung "Index außerhalb des gültigen Bereichs"
Ich denke das liegt daran das man mit splitt nur 26 mal splitten kann oder? |
|
| |
|
|
ZiG
Überflieger
Anmeldedatum: 16.04.2008
Beiträge: 421
|
Verfasst am: 16.07.2008, 10:20 |
|
|
Ähm ne. Da machst du wohl was falsch.
Ich würde mal sagen du postet deinen source. |
|
| |
|
|
nicok
Poster
Anmeldedatum: 15.05.2008
Beiträge: 161
|
Verfasst am: 16.07.2008, 10:49 |
|
|
Visual Basic: [code]
For i = 1 To 100 Step 1
Teile = Split(Daten, "!-!")
a = a + 1
If Teile((a)) = "" Then
i = 100 'hier wird die schleife verlassen
Else
ListView1.ListItems.Add (1), , Teile((a))
End If
Next i
[/code]
so dass wäre er |
|
| |
|
|
sollniss
Überflieger
Anmeldedatum: 01.05.2008
Beiträge: 699
|
Verfasst am: 16.07.2008, 11:58 |
|
|
LOL wasn Code xD...
Visual Basic: [code]
Teile = Split(Daten, "!-!")
dim i as integer
For i = 0 to ubound(teile) -1
ListView1.ListItems.Add (1), , Teile(i)
Next i
[/code]
Versuchs mal so. |
|
| |
|
|
bla
Coder
Anmeldedatum: 02.05.2008
Beiträge: 267
|
Verfasst am: 16.07.2008, 11:58 |
|
|
Visual Basic: [code]Dim Teile() As String
Dim Daten As String
Daten = "1!-!2!-!3!-!4!-!5!-!6!-!7!-!8!-!9!-!10"
Teile = Split(Daten, "!-!")
For i = 1 To UBound(Teile()) + 1 'das "+1" muss weg, wenn am ende von "Daten", "!-!" steht
ListView1.ListItems.Add , , Teile(i - 1)
Next i[/code]
so müsste es eig. klappen
//sekunden zu spät -.-  |
|
| |
|
|
Registrieren
Login
