Dim WithEvents bind As Binding
.....
        bind = New Binding("Image", bSource_, "F_IMAG")
        Me.PictureBox1.DataBindings.Add(bind)

.....

    Private Sub Binding_Format(ByVal sender As System.Object, ByVal e As ConvertEventArgs) Handles bind.Format
        Dim img As Byte()
        img = CType(e.Value, Byte())   'Unable to cast object of type 'System.String' to type 'System.Byte[]'.

        If (Not img Is Nothing) Then
            e.Value = Image.FromStream(New System.IO.MemoryStream(img))
        End If
    End Sub


thanks for any help !