como se hace en vb.net?

[Artur]

No funciona, ya lo había probado y me da el siguente error:

Un valor de typo 'Byte' no se puede convertir en '2'

si un caso deberiamos asignarlo asi:

Dim b() As Byte = {CType(e.Value, Byte)}

pero no hace lo que quiero:

Este es el código que quiero hacer:

Dim bphoto As Binding = New Binding("Image", m_Dicc.DS, m_Dicc.Tabla.TableName & "." & Controls(i).Tag)
AddHandler bphoto.Format, AddressOf PictureFormat
Controls(i).DataBindings.Add(bphoto)

Private Sub PictureFormat(ByVal sender As Object, ByVal e As ConvertEventArgs)
'Byte[] b = ( Byte[] ) e.Value
Dim b() As Byte = {CType(e.Value, Byte)} ???????
Dim ms As MemoryStream = New MemoryStream
Dim offset As Integer = 78
ms.Write(b, offset, b.Length - offset)
Dim bmp As Bitmap = New Bitmap(ms)
ms.Close()
'Writes the new value back
e.Value = bmp
End Sub