Mega Code Archive

 

Categories / VB.Net / File Directory

 

Create StreamWriter with Encoding UTF8 and buffer size

Imports System Imports System.IO Imports System.Text Public Class Test     Public Shared Sub Main()         Dim FileName As String= "test.txt"          Dim TextToAdd As String = "data"         Dim Fs As FileStream = New FileStream(FileName, FileMode.CreateNew, FileAccess.Write, FileShare.None)              Dim SwFromFileStreamUTF8Buffer = New StreamWriter(Fs, System.Text.Encoding.UTF8, 512)         SwFromFileStreamUTF8Buffer.Write(textToAdd)         SwFromFileStreamUTF8Buffer.Flush()         SwFromFileStreamUTF8Buffer.Close()     End Sub End Class