كيف اظهر صورة موجودة في picturebox على التقرير مباشرة

PHP كود :
Try
            facture_print = Label18.Text
            Dim BonDeCommonde1 As New CrystalReportFacture1


            Dim ms As New System.IO.MemoryStream
            PictureBox1.Image.Save(ms, System.Drawing.Imaging.ImageFormat.Bmp)
            Dim byt() As Byte = ms.ToArray
            ds1.ventefact.Rows.Add(byt, Label18.Text, nom_client1, adresse1, tel1, tva, Label6.Text, Label10.Text, DateTimePicker1.Value.Date)


            If conectstata = 1 Then
                da = New SqlDataAdapter("select code_facture,nom_client,adresse,tel,tva,total_htc,total_ttc,Date1,designation_article,prix_vente,qte_vendu,htc,ttc from ventefact where code_facture= " & Val(Label18.Text) & "", connectt)
                da.Fill(ds1.ventefact)
            Else
                connectt.Open()
            End If
            ' DataGridView2.DataSource = ds1.ventefact
            BonDeCommondeShow.CrystalReportViewer1.ReportSource = BonDeCommonde1

            BonDeCommonde1.SetDataSource(ds1.Tables("ventefact"))


            ds1.ventefact.Clear()

            'حجم العرض
            BonDeCommondeShow.CrystalReportViewer1.Zoom(100%)
            'تحديث التقرير
            BonDeCommondeShow.CrystalReportViewer1.Refresh()
            BonDeCommondeShow.ShowDialog()

        Catch ex As Exception
            MsgBox("some error", MsgBoxStyle.Critical)
            Exit Sub
        End Try