Click here to Skip to main content

jamiebones asked:

Open original thread
Hello please i am trying to save the result of an operation where i modified some text in a sample application. The problem is i am having difficulty in trying to loop through all the data.Trying to print out my result to a file, i get only the last line of the file.My code simply refuse to loop and write all the data into a text file but it just writes the last data on the line.Please any help on how i can make this work will be highly appreciated.Once again thanks to all.Below is my code.

Using myreader As StreamReader = New StreamReader("C:\Users\Jamiebones\Desktop\ConsoleApplication1\ConsoleApplication1\PHONE NUMBERS.txt")
 
          While Not (myreader.EndOfStream)
 

              Dim line As String = myreader.ReadLine
              Dim strBuilder As New Text.StringBuilder
              If String.IsNullOrEmpty(line) = False AndAlso line.Length > 1 Then
                  strBuilder.Append("234")
                  strBuilder.Append(line.Remove(0, 1))
 
                  For i = 0 To strBuilder.Length - 1
 
                      Dim writer As StreamWriter = New StreamWriter("C:\phone numbers.txt")
                      writer.Write(strBuilder.ToString)
 
                      writer.Close()
 
                  Next i
 
              End If
 
              Console.WriteLine(strBuilder.ToString)
 
          End While
          Console.ReadLine()
 
      End Using
Tags: VB.NET, IO, strings

Preview



When answering a question please:
  1. Read the question carefully.
  2. Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
  3. 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.
Let's work to help developers, not make them feel stupid.
Please note that all posts will be submitted under the The Code Project Open License (CPOL).



Advertise | Privacy | Mobile
Web01 | 2.8.150414.1 | Last Updated 26 Mar 2009
Copyright © CodeProject, 1999-2015
All Rights Reserved. Terms of Service
Layout: fixed | fluid

CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100