تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] مشكلة فى كود عرض الصورة
#11
تفضل اخى الكريم
الرد }}}
تم الشكر بواسطة:
#12
المعذرة... المعذرة محتاج إعادة ترتيب وخصوصا أنه لا يحتوي شرح للأسطر في الكود.

اضع التصحيح لاحقا لتأخر الوقت.
الرد }}}
تم الشكر بواسطة:
#13
مافيش مشكلة خذ وقتك
الرد }}}
تم الشكر بواسطة:
#14
هذا التعديل، اعتذر عن التاخير
PHP كود :
Private Sub ListView1_ItemSelectionChanged(sender As ObjectAs System.Windows.Forms.ListViewItemSelectionChangedEventArgsHandles 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 
الرد }}}
تم الشكر بواسطة: sendbad100
#15
(04-04-17, 05:37 PM)abdualla كتب : هذا التعديل، اعتذر عن التاخير
PHP كود :
   Private Sub ListView1_ItemSelectionChanged(sender As ObjectAs System.Windows.Forms.ListViewItemSelectionChangedEventArgsHandles 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
#16
أخى العزيز abdualla
الحمد لله الذى تتم بنعمته الصالحات
جزاك الله خيرا كثيراً انت ومن تحب
الكود يعمل بكفاءة
شكرا على تواصلك معى ومساعدتى فى مشكلتى
جزاك الله خيرا مرة أخرى
الرد }}}
تم الشكر بواسطة: abdualla



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم