Dim img As Image = pb1.Image

        Dim mstream As IO.MemoryStream = New IO.MemoryStream()

        img.Save(mstream, System.Drawing.Imaging.ImageFormat.Bmp)

        Dim buffer() As Byte = New Byte(mstream.Length) {}

        mstream.Position = 0
        mstream.Read(buffer, 0, buffer.Length)

        Me.pb2.Image = Image.FromStream(mstream)

        mstream.Close()