StringWriter Class
Implements a TextWriter for writing information to a string. The information is stored in an underlying StringBuilder.
Assembly: mscorlib (in mscorlib.dll)
The following table lists examples of other typical or related I/O tasks.
To do this... | See the example in this topic... |
|---|---|
Create a text file. | |
Write to a text file. | |
Read from a text file. | |
Append text to a file. | |
Get the size of a file. | |
Get the attributes of a file. | |
Set the attributes of a file. | |
Determine if a file exists. | |
Read from a binary file. | |
Write to a binary file. |
The following code example demonstrates the creation of a continuous paragraph from a group of double-spaced sentences, and then the conversion of the paragraph back to the original text.
Option Explicit Option Strict Imports Microsoft.VisualBasic Imports System Imports System.IO Public Class StrReader Shared Sub Main() Dim textReaderText As String = "TextReader is the " & _ "abstract base class of StreamReader and " & _ "StringReader, which read characters from streams " & _ "and strings, respectively." & _ vbCrLf & vbCrLf & _ "Create an instance of TextReader to open a text " & _ "file for reading a specified range of characters, " & _ "or to create a reader based on an existing stream." & _ vbCrLf & vbCrLf & _ "You can also use an instance of TextReader to read " & _ "text from a custom backing store using the same " & _ "APIs you would use for a string or a stream." & _ vbCrLf & vbCrLf Console.WriteLine("Original text:" & vbCrLf & vbCrLf & _ textReaderText) ' From textReaderText, create a continuous paragraph ' with two spaces between each sentence. Dim aLine, aParagraph As String Dim strReader As New StringReader(textReaderText) While True aLine = strReader.ReadLine() If aLine Is Nothing Then aParagraph = aParagraph & vbCrLf Exit While Else aParagraph = aParagraph & aLine & " " End If End While Console.WriteLine("Modified text:" & vbCrLf & vbCrLf & _ aParagraph) ' Re-create textReaderText from aParagraph. Dim intCharacter As Integer Dim convertedCharacter As Char Dim strWriter As New StringWriter() strReader = New StringReader(aParagraph) While True intCharacter = strReader.Read() ' Check for the end of the string ' before converting to a character. If intCharacter = -1 Then Exit While End If convertedCharacter = Convert.ToChar(intCharacter) If convertedCharacter = "."C Then strWriter.Write("." & vbCrLf & vbCrLf) ' Bypass the spaces between sentences. strReader.Read() strReader.Read() Else strWriter.Write(convertedCharacter) End If End While Console.WriteLine(vbCrLf & "Original text:" & vbCrLf & _ vbCrLf & strWriter.ToString()) End Sub End Class
Windows 7, Windows Vista, Windows XP SP2, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP Starter Edition, Windows Server 2008 R2, Windows Server 2008, Windows Server 2003, Windows Server 2000 SP4, Windows Millennium Edition, Windows 98, Windows CE, Windows Mobile for Smartphone, Windows Mobile for Pocket PC, Xbox 360, Zune
The .NET Framework and .NET Compact Framework do not support all versions of every platform. For a list of the supported versions, see .NET Framework System Requirements.