Split functie met lege regel

[xl3igplayer]

Hallo allemaal,

Ik ben bezig met een project maar zit vast met een probleem.
Ik heb een TextBox met een tekst die ik gesplit wil hebben.
Maar na iedere split wil ik een nieuwe regel.

hallo ## helpmij ## bedankt

en daarvan wil ik graag maken

hallo
helpmij
bedankt

de code die ik nu gebruik is
[CPP]Dim string2() As String = downloadstring.Split("##")


For i = 0 To string2.Length - 1
RichTextBox1.Text = RichTextBox1.Text & string2(i) + vbCrLf

Next[/CPP]

maar het resultaat is dan dat er tussen iedere split 2 lege regels zitten.

hallo


helpmij


bedankt

Ik wil graag dat de code het stukje goed split, of een stukje code dat de lege regels weggelaten worden.

Alvast bedankt!

Eddie,

 

[mastermindzh]

Het probleem is dat hij ook de ## leest als regel, en deze dus als lege tekst toevoegd. (richtextbox text + niks + nieuwe regel)

 

[xl3igplayer]

Nee, werkt nog steeds niet...

 

[mastermindzh]

Dit werkt

[CPP]
Dim downloadstring As String = "hallo ## helpmij ## bedankt"
Dim string2() As String = downloadstring.Split("##")

For Each s In string2
If Not s = "" Then
RichTextBox1.Text = RichTextBox1.Text & s & vbNewLine
End If
Next

[/CPP]

en dit was het probleem:

Het probleem is dat hij ook de ## leest als regel, en deze dus als lege tekst toevoegd. (richtextbox text + niks + nieuwe regel)

[edit] Ik heb ook je loop (met een i voor index) aangepast, dit heeft verder niks met het probleem te maken [/edit]

 

[xl3igplayer]

Hoppa het werkt!
Super bedankt voor het snelle reageren!

Eddie,

 

[mastermindzh]

Geen probleem en succes verder!