12-02-17, 04:13 AM
12-02-17, 05:04 AM
وعليكم السلام ورحمة الله وبركاته
إستخدم هذا الكود :
إستخدم هذا الكود :
PHP كود :
Private Sub Command1_Click()
Dim zListData As String
Dim I As Integer
For I = 0 To List1.ListCount - 1
zListData = zListData & List1.List(I) & vbNewLine
Next
Clipboard.SetText zListData
End Sub
14-02-17, 10:49 PM
السلام عليكم ورحمة الله وبركاته
يعجز اللسان عن شكركم
دائما رائع كما عهدتك في المنتدى القديم
حفظك الله وسدد خطاك
يعجز اللسان عن شكركم
دائما رائع كما عهدتك في المنتدى القديم
حفظك الله وسدد خطاك
