منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

تفضل اخى الكريم

المعذرة... المعذرة محتاج إعادة ترتيب وخصوصا أنه لا يحتوي شرح للأسطر في الكود.

اضع التصحيح لاحقا لتأخر الوقت.

مافيش مشكلة خذ وقتك

هذا التعديل، اعتذر عن التاخير

(04-04-17, 05:37 PM)abdualla كتب : [ -> ]هذا التعديل، اعتذر عن التاخير

PHP كود :

   Private Sub ListView1_ItemSelectionChanged(sender As Object, e As System.Windows.Forms.ListViewItemSelectionChangedEventArgs) Handles ListView1.ItemSelectionChanged
        TextBox1.Text = e.Item.Tag
        Using ad As New OleDbDataAdapter("select * from Tab2 where id=@id", con)
            ad.SelectCommand.Parameters.AddWithValue("@id", e.Item.Tag)
            Dim t As New DataTable
            ad.Fill(t)
            If t.Rows.Count > 0 Then

                Dim bytes() As Byte = CType(t.Rows(0)("Picture"), Byte())
                Dim memStream As MemoryStream = New MemoryStream(bytes)
                PictureBox1.Image = Image.FromStream(memStream)

            End If
        End Using
    End Sub 


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

أخى العزيز abdualla
الحمد لله الذى تتم بنعمته الصالحات
جزاك الله خيرا كثيراً انت ومن تحب
الكود يعمل بكفاءة
شكرا على تواصلك معى ومساعدتى فى مشكلتى
جزاك الله خيرا مرة أخرى