[@@أبورائد@@]

السلام عليكم ورحمة الله وبركاته


جرب هذا المثال قد يفيدك (يشمل دالة ByteToImage من مكتبتي)

كود :

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        '
        '
        Dim ds As New DataSet
        '
        ' Dataset بعد تعبئة
        Me.PictureBox1.Image = ByteToImage(ds.Tables(0).Rows(0).Item("photo"))

    End Sub


#Region " ByteToImage "
    Public Function ByteToImage(ByVal rowItem As Object) As Image
        On Error Resume Next
        Return Image.FromStream(New IO.MemoryStream(DirectCast(CObj(rowItem), Byte())))
    End Function
#End Region

End Class

السلام عليكم ورحمة الله وبركاته