BinaryReader.ReadByte reads the next byte from the current stream : Binary File Read « File Directory « VB.Net






BinaryReader.ReadByte reads the next byte from the current stream

 

Imports System
Imports System.IO

Public Class BinaryRW
    Shared Sub Main()
        Dim i As Integer = 0
        Dim writeArray(1000) As Byte
        Dim randomGenerator As New Random()
        randomGenerator.NextBytes(writeArray)

        Dim binWriter As New BinaryWriter(New MemoryStream())
        Dim binReader As New BinaryReader(binWriter.BaseStream)
        Try
            For i = 0 To writeArray.Length - 1
                binWriter.Write(writeArray(i))
            Next i
            binReader.BaseStream.Position = 0
            For i = 0 To writeArray.Length - 1
                If binReader.ReadByte() <> writeArray(i) Then
                    Console.WriteLine("Error writing the data.")
                    Return
                End If
            Next i
        Catch ex As EndOfStreamException
            Console.WriteLine("Error writing the data: {0}",ex.GetType().Name)
        End Try

    End Sub
End Class

   
  








Related examples in the same category

1.Reading a sequential-access fileReading a sequential-access file
2.Read and Write Binary file: int, string Read and Write Binary file: int, string
3.Read from a binary fileRead from a binary file
4.Check Files Are Identical
5.BinaryReader.Read reads the specified number of characters from the stream
6.BinaryReader.ReadBytes reads the specified number of bytes
7.BinaryReader.ReadChar reads the next character from the stream