Caricare un PictureBox con un file utilizzando un MemoryStream

Caricando il PictureBox utilizzando un MemoryStream si evita di tenere bloccato il file.

‘Caricamento file nel Buffer
Dim fs As New System.IO.FileStream(“E:\Test.bmp”, IO.FileMode.Open, IO.FileAccess.Read)
Dim buffer(CInt(fs.Length) – 1) As Byte

fs.Read(buffer, 0,

CInt(fs.Length))
fs.Close() : fs =
Nothing

 

‘Caricamento Buffer nel MemoryStream
Dim ms As New System.IO.MemoryStream(buffer)
buffer =
Nothing

 

‘Lettura immagine da MemoryStream
Me.PictureBox1.Image = System.Drawing.Image.FromStream(ms)