Text Line split visual basic

Question

2.00/5 (1 vote)

See more:

Hi,

How can I split in two parts Original line ? Thanks.

original line = HD_PRS22_S_DL 33000

Textbox1 thus = HD_PRS22_S_DL

Textbox2 thus = 33000

Not: HD_PRS22_S_DL < one tab space > 33000

Posted 14-Dec-13 11:38am

EssenceGold

Add a Solution

Comments

Peter Leow 14-Dec-13 20:27pm

Is there a space between 'L' and '3'?

3 solutions

Solution 3

The method that I would use is the shared Split method on the string class. This method has several overloads, but there is one that does become apparent in the intellisence suggestions because it is a special case where the split items array is null (Nothing). This tells the method to use whitespace characters as the split points. The exact list of characters used depends on the version of the .Net framework. For .Net 4.0 and above its is the same list used by the Char.IsWhiteSpace method [^] For .Net 3.5 and below see this list in the remarks section here[^].

C#

Dim str As String = "1" & vbLf & "2" & vbTab & "3" & vbCrLf & "4 5"
Dim parts() As String = str.Split(New Char() {}, System.StringSplitOptions.RemoveEmptyEntries)

Parts will be an array comprising five strings. The second parameter in the method, (System.StringSplitOptions.RemoveEmptyEntries, tells the Split method to delete e,mptry entries that could be created by consecutive whitespace characters such as the VBCrLF (carriage return and linefeed) shown in the example code.

Posted 14-Dec-13 15:13pm

TnTinMn

Solution 2

There are a number of ways to achieve it. Check this out:
www.dotnetperls.com/split-vbnet[^]

Posted 14-Dec-13 14:29pm

Peter Leow

Updated 14-Dec-13 14:34pm

v2

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Mike Meinz · Accepted Answer · 2013-12-14T11:54:00

This sample code assumes that a single space is the delimiter between the two subparts of the string.

VB

Dim strInput As String = "HD_PRS22_S_DL 33000"
Dim x As Integer = strInput.IndexOf(" ") ' Assumes space is the delimiter
Console.WriteLine(strInput.Substring(0, x))
Console.WriteLine(strInput.Substring(x + 1))

This sample code assumes that a single Tab character is the delimiter between the two subparts of the string.

VB

Dim strInput As String = "HD_PRS22_S_DL" & vbTab & "33000"
Dim x As Integer = strInput.IndexOf(vbTab) ' Assumes Tab is the delimiter
Console.WriteLine(strInput.Substring(0, x))
Console.WriteLine(strInput.Substring(x + 1))

This sample code assumes that one or more spaces are the delimiter between the two subparts of the string.

VB

Dim strInput As String = "HD_PRS22_S_DL" & SPACE(5) & "33000"
Dim x As Integer = strInput.IndexOf(" ") ' Assumes space is the delimiter
Console.WriteLine(strInput.Substring(0, x).Trim)
Console.WriteLine(strInput.Substring(x + 1).Trim)

This sample code assumes that a Tab character is the delimiter but there could be one or more spaces between the two subparts of the string.

VB

Dim strInput As String = "HD_PRS22_S_DL" & SPACE(2) & vbTab & SPACE(2) & "33000"
Dim x As Integer = strInput.IndexOf(vbTab) ' Assumes Tab is the delimiter
Console.WriteLine(strInput.Substring(0, x).Trim)
Console.WriteLine(strInput.Substring(x + 1).Trim)