Help on index and count must refer to a location on the string

Question

1.00/5 (1 vote)

See more:

Hello please i am trying to remove some string from a set of string which i loaded from an external file. I am able to loop through all the data in the file with a while loop. After looping through the data i want to remove the first part of the string and add another string to it. For example if this are the data loaded from from the file.
0803456789
0805566788
0802345666
0802334453
0804528721
After looping through i want to remove the first string of each line.Like the first line i will remove the 0 in front and add 234 to it.To give me a new string like 234803456789.I am able to do all that the problem now is that it gives an error saying index and count must refer to a location on the string.Don't know what more to do.Please any help is highly appreciated.Thanks,this is my code so far.

VB

Sub Main()
        Using myreader As StreamReader = New StreamReader("C:\Users\Jamiebones\Desktop\learning_application\learning_application\Phone Number.txt")

            While Not (myreader.EndOfStream)


                Dim line As String = myreader.ReadLine
                Dim jam As String = ""
                jam = "234" & line.Remove(0, 1)


                Console.WriteLine(jam)

            End While
            Console.ReadLine()
            
        End Using

[Edit]Code block added[/Edit]

Posted 17-Nov-12 17:49pm

jamiebones

Updated 19-Nov-12 7:19am

Thomas Daniels

v4

Add a Solution

Comments

Sergey Alexandrovich Kryukov 18-Nov-12 0:15am

What exactly do you mean by "VB"?
--SA

jamiebones 18-Nov-12 0:17am

I mean I am coding in visual basic

Sergey Alexandrovich Kryukov 18-Nov-12 0:31am

I suspect it's VB.NET, is it not?
--SA

Master.Man1980 19-Nov-12 13:58pm

Why you ask such question o_O. There is no StreamReader in "VB"

Sergey Alexandrovich Kryukov 19-Nov-12 14:11pm

Why not? Do I look like the one who would even take any interest in VB? :-)
You are the one who is most interested in accurate tagging of the question, to attract people with relevant experience, not me. Got it?
--SA

Master.Man1980 19-Nov-12 14:21pm

I got it, but you don't. Op may tagged it wrongly, but it easy to understand based on his code.

Sergey Alexandrovich Kryukov 19-Nov-12 15:15pm

I know. I do not want to understand anything based on code. Normal people don't want it. Most important, OP does not want it. If the question is poorly tagged, guess who is the looser?
--SA

jamiebones 19-Nov-12 19:49pm

please sorry for tagging it wrongly. It was not intentional

Sergey Alexandrovich Kryukov 19-Nov-12 19:59pm

Not a problem, as soon as you tag it finally, but -- wait a minute -- you just said there is not StreamReader in VB. It should mean .NET System.IO.StreamReader, then the tag should be "VB.NET", right?
--SA

1 solution

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)

Jean-Claude ADIBA · Accepted Answer · 2012-11-19T07:43:00

try this

VB

Sub Main()
    Using myreader As StreamReader = New StreamReader("
C:\Users\Jamiebones\Desktop\learning_application\learning_application\Phone Number.txt")

        While Not (myreader.EndOfStream)
            Dim line As String = myreader.ReadLine.Trim 'remove white space
            Dim strBuilder As New Text.StringBuilder 'better for performance
            If String.IsNullOrEmpty(line) = False AndAlso line.Length > 1 Then
                strBuilder.Append("234")
                strBuilder.Append(line.Remove(0, 1))
            End If
            Console.WriteLine(strBuilder.ToString)
        End While
        Console.ReadLine()

    End Using

End Sub