[ahmed_elwerfalli]

السلام عليكم إخواني ,, 

أنا لدي قاعدة بيانات أكسس بها جدول يحتوي على صورة و إستخدمت هذا الكود لحفظ الصورة 

كود :

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
       Try
         
           Dim freader As New FileStream(OpenFileDialog1.FileName, FileMode.Open, FileAccess.Read)
           Dim breader As New BinaryReader(freader)
           Dim imbuffer(freader.Length) As Byte
           breader.Read(imbuffer, 0, freader.Length)
           Dim sqls As String = "INSERT INTO img_tb (imname,imga) values (@x1,@x2)"
           Dim cmda As New OleDbCommand(sqls, cn)
           'cmda.CommandText = sqls
           'cmda.Connection = cn
           cmda.Parameters.AddWithValue("@x1", linen.Text)
           cmda.Parameters.AddWithValue("@x2", imbuffer)
           cmda.ExecuteNonQuery()
           'cmda.Dispose()
           MsgBox("saved")
       Catch ex As Exception
           MsgBox(ex.Message)
       End Try
   End Sub

المطلوب كيف استجلب هذه الصورة من قاعدة البيانات و عرضها على PictureBox1 الموجود على الفورم 

مشكورين سلفاً