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

نسخة كاملة : كيفية نسخ محتويات الأداة List
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله
هل يمكنني الحصول على كود لنسخ كل محتويات الأداة Listbox  و كيفية تحديدها
ألف شكر مسبقا
Heart
وعليكم السلام ورحمة الله وبركاته

إستخدم هذا الكود :

PHP كود :
Private Sub Command1_Click()

Dim zListData As String
Dim I 
As Integer

For 0 To List1.ListCount 1
    zListData 
zListData List1.List(I) & vbNewLine
Next

Clipboard
.SetText zListData

End Sub 
السلام عليكم ورحمة الله وبركاته
يعجز اللسان عن شكركم
دائما رائع كما عهدتك في المنتدى القديم
حفظك الله وسدد خطاك