Mega Code Archive

 

Categories / VB.Net Tutorial / Stream File

 

Use MemoryStream to read a file

Imports System.IO Imports System.Text Imports System.Threading          Public Class Tester     Public Shared Sub Main         Dim bteRead() As Byte         Dim bteArray(256) As Byte         Dim myMemortStream As MemoryStream         Dim myFileStream As FileStream         Try             myFileStream = New FileStream("test.vb", FileMode.Open, FileAccess.Read)             ReDim bteRead(myFileStream.Length)             myFileStream.Read(bteRead, 0, myFileStream.Length)             myMemortStream = New MemoryStream(256)             myMemortStream.Write(bteRead, 128, 256)             bteArray = myMemortStream.ToArray()             Console.WriteLine(Encoding.ASCII.GetString(bteArray))             myMemortStream.Close()             myFileStream.Close()         Catch ex As Exception             Console.WriteLine(ex.Message)         End Try     End Sub      End Class