[Pretzels]

Hey,

I have a richtextbox with the following content:

Code

abcd*efgh*ijkl*mnop
1234*5678*9101*1121

I have the following code to extract each line from the richtextbox:

Code

For Each file In b.Text
        Dim item As String = file.ToString
        Dim first As String() = item.split("*")(0)
        Msgbox(first)
Next

But that code, for some reason, returns only the first letter, so or a, or 1.

Why?

How else could I do this?

[SIM-964740]

Code

For Each file In b.Text
      Dim item As String = file.ToString
      Dim first As String() = item.split("*")
      Dim fValue as String =  first(0)
      Dim sValue as String =  first(1)
      Msgbox(fValue)
Next

This will work and may be more useful in the future.

[sanderele1]

Your problem is on this line:

PHP Code


<?php 
Dim first As String() = item.split("*")(0) 


Remove the () in the Dim first as string()

[+Haze]

I could fix the code for you, but it's better to learn for yourself.
http://howtostartprogramming.com/vb-net/...g-strings/

[Cairns]

Code

For each Item as string in textbox.lines
Dim Value as string = split(item,"*")(0)
Next

Should work fine

[Pretzels]

Got it sorted and is now working, thanks for your help.