Splitten met meerdere tekens

[Spy1]

Zoals de titel al aanduid, ik vraag me af hoe ik met meerdere tekens een tekst kan splitten, ik split bijvoorbeeld met "hallo", maar dan split hij alleen de eerste letter dus h. En ik wil juist met meerdere letters splitten, hoe kan ik dat krijgen?

 

[mark199]

Zoiets?

Dim hallo As String = "hallo"

For Each letter As Char In hallo.ToCharArray
Response.Write(letter + "<br />")

Next

 

[Spy1]

Dit is niet egt wat ik zocht volgens mij, ik heb de WriteLine veranderd in MsgBox, zodat ik kon zien wat hij laat zien. Maar hij laat gewoon steeds een nieuwe msgbox zien met een letter erin van de woord, steeds verder.

 

[Pizara]

Je kan eerst je 'splittext' vervangen voor een karakter wat eigenlijk nooit voorkomt (ascii 255) ofzo. Dan splitten op die karakter.

        Dim SplitString As String = "hallo"

        Dim ZoekString As String = "ik begroet bijna altijd met hallo anders met hoi"

        ZoekString = ZoekString.Replace(SplitString, Chr(255))

        Dim Array() As String = ZoekString.Split(Chr(255))

 

[Spy1]

Hm, ik snap de code niet helemaal dus daarom vraag ik je, hoe moet ik wat hij heeft gesplit in een textbox zetten?

 

[madrofiel]

zou je het misschien iets beter uitleggen wat je precies wilt?

zover ik het begrijp zal ik het zo doen.

Dim SplitString as Char() = "Hallo".ToArray
Msgbox(SplitString)

In de msgbox komt dan het woord weer te staan.

 

[Spy1]

Jullie snappen mij volgens mij niet. Het split gewoon elk teken. Maar ik wil dit, voorbeeld:

hallo ik ben
jan-klaas
en ik wil geen
klaas heten!

en dan moet hij bij "jan-klaas" het splitten en dan in een msgbox de 2 volgende zinnen "en ik wil geen klaas heten!" laten zien.

 

[madrofiel]

dan is wat Pizara zegt nog het beste

        Dim SplitString As String = "hallo"

        Dim ZoekString As String = "ik begroet bijna altijd met hallo anders met hoi"

        ZoekString = ZoekString.Replace(SplitString, Chr(255))

        Dim Array() As String = ZoekString.Split(Chr(255))

        For i As Integer = 0 To Array.Length - 1
            MsgBox(Array(i))
        Next

Even overgenomen maar nu met Msgbox erbij.

de uitkomst is dan
"ik begroet bijna altijd met "
" anders met hoi"

 

[Spy1]

Bedankt allemaal!