Gestire file binari in VB.NET

il .NET ci fornisce BinaryWriter e BinaryReader per scrivere e leggere file binari.

In questo articolo vediamo come usarli in VB.NET.

Mettiamo tutto insieme per semplcità di codice:

Imports System.IO
Imports System.Text

Module Program
    Sub Main(args As String())
        Dim fileName As String = "file.bin"
        Dim autore As String = "Stephen King"
        Dim titolo As String = "IT"
        Dim prezzo As Double = 50.36

        Using binWriter As New BinaryWriter(File.Open(fileName, FileMode.Create))
            binWriter.Write(autore)
            binWriter.Write(titolo)
            binWriter.Write(prezzo)
        End Using

        Console.WriteLine("File creato!")
        Console.WriteLine("-----")

        If File.Exists(fileName) Then
            Using stream = File.Open(fileName, FileMode.Open)
                Using reader As New BinaryReader(stream, Encoding.UTF8, False)
                    Console.WriteLine(reader.ReadString())
                    Console.WriteLine(reader.ReadString())
                    Console.WriteLine(reader.ReadDouble())
                End Using
            End Using
        End If

    End Sub
End Module

Enjoy!