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

نسخة كاملة : كيفية عمل صندوق صورة
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم عندى سؤال  و هو كيفية عملت صندوق صورة مع استخدام الاداء لست بوكس و الاداء ImageList
وعند الضغط على الصور يتم اظهر رقمها فى رسائلة نصية
[attachment=27299]
اول محاولة ليا بس مش عارف اوصل للشكل لى فوق
[attachment=27300]
كود :
 ListView2.View = View.LargeIcon
       ListView2.FullRowSelect = True
       For i As Integer = 0 To 4
           ListView2.Items.Add("", ImageList1.Images.Keys(i))
       Next
ما هو الحل شباب
شكرا ليك اخى العزيز على الرد و لكن عندى سؤال تانى و هو قومت بعمل تعديل على كود و لكن لا يعمل
جيث اريد عند الضغط على صورة يتم اضافة ادخل RichTextBox1
كود :
Private Sub pb_Click(ByVal sender As Object, ByVal e As EventArgs)
       'MsgBox(sender.Text)
       Clipboard.SetImage(ImageList1.Images.Item())
       RichTextBox1.Paste()

   End Sub
شكرا ليك اخى العزيز الكود يعمل بنجاح
هل يمكن التحكم فى جوده الصورة ام لا